mirror of
https://github.com/rstudio/shiny.git
synced 2026-02-01 02:05:51 -05:00
23 lines
489 B
R
23 lines
489 B
R
library(shiny)
|
|
|
|
# Define UI for application that plots random distributions
|
|
shinyUI(pageWithSidebar(
|
|
|
|
# Application title
|
|
headerPanel("Hello Shiny!"),
|
|
|
|
# Sidebar with a slider input for number of observations
|
|
sidebarPanel(
|
|
sliderInput("obs",
|
|
"Number of observations:",
|
|
min = 0,
|
|
max = 1000,
|
|
value = 500)
|
|
),
|
|
|
|
# Show a plot of the generated distribution
|
|
mainPanel(
|
|
plotOutput("distPlot")
|
|
)
|
|
))
|