Skip to content

Instantly share code, notes, and snippets.

@arthur-flam

arthur-flam/ui.R

Created July 8, 2013 23:02
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save arthur-flam/5953222 to your computer and use it in GitHub Desktop.
Save arthur-flam/5953222 to your computer and use it in GitHub Desktop.
Download ZIP
Premier exemple
Raw
ui.R
shinyUI(bootstrapPage(
selectInput(inputId = "n_breaks",
label = "Number of bins in histogram (approximate):",
choices = c(10, 20, 35, 50),
selected = 20),
checkboxInput(inputId = "individual_obs",
label = strong("Show individual observations"),
value = FALSE),
checkboxInput(inputId = "density",
label = strong("Show density estimate"),
value = FALSE),
plotOutput(outputId = "main_plot", height = "300px"),
# Display this only if the density is shown
conditionalPanel(condition = "input.density == true",
sliderInput(inputId = "bw_adjust",
label = "Bandwidth adjustment:",
min = 0.2, max = 2, value = 1, step = 0.2)
)
))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment