Add radio buttons.
bulmaRadioInput(inputId, choices, selected)
inputId | the input slot that will be used to access the value. |
---|---|
choices | vector of choices, named or unnamed. |
selected | selected radio input. |
John Coene, jcoenep@gmail.com
if(interactive()){ library(shiny) shinyApp( ui = bulmaPage( bulmaTitle("Hello Bulma"), bulmaRadioInput("select", c("Miles per galon" = "mpg", "Rear axle ratio" = "drat"), selected = "mpg"), plotOutput("value") ), server = function(input, output) { output$value <- renderPlot( plot(1:nrow(mtcars), mtcars[[input$select]]) ) } ) }