{{ headContent() }} {{ bootstrapLib() }}

Minimal HTML UI

Control panel

{{ sliderInput("year", "Year", min = 1893, max = 2005, value = c(1945, 2005), sep = "") }} {{ textInput("title", "Title") }}
{{ selectInput("genre", "Which genre?", c("Action", "Animation", "Comedy", "Drama", "Documentary", "Romance", "Short")) }}
{{ plotOutput("budgetYear") }}

For more information about Shiny look at the documentation.


If you wish to write some code you may like to use the pre() function like this:

sliderInput("year", "Year", min = 1893, max = 2005,
                   value = c(1945, 2005), sep = "")