Add dropdown input

Add dropdown otpions.

bulmaSelectInput(inputId, label, choices, rounded = FALSE)

Arguments

inputId	the input slot that will be used to access the value.
label	input label.
choices	vector of choices.
rounded	set to round corners.

Author

John Coene, jcoenep@gmail.com

Examples

if(interactive()){
library(shiny)

shinyApp(
  ui = bulmaPage(
   bulmaTitle("Hello Bulma"),
   bulmaSelectInput("var", "Select",
     choices = c("Miles per galon" = "mpg", "Displacement" = "disp")),
   tableOutput("plot")
  ),
  server = function(input, output) {
    output$plot <- renderTable({
      mtcars[, c("wt", input$var), drop = FALSE]
    }, rownames = TRUE)
  }
)
}