awesomeRadio: Awesome Radio Buttons Input Control

In shinyWidgets: Custom Inputs Widgets for Shiny

Awesome Radio Buttons Input Control

Description

Create a set of prettier radio buttons used to select an item from a list.

Usage

awesomeRadio(
  inputId,
  label,
  choices,
  selected = NULL,
  inline = FALSE,
  status = "primary",
  checkbox = FALSE,
  width = NULL
)

Arguments

inputId	The input slot that will be used to access the value.
label	Display label for the control, or NULL for no label.
choices	List of values to select from (if elements of the list are named then that name rather than the value is displayed to the user)
selected	The initially selected value (if not specified then defaults to the first value).
inline	If TRUE, render the choices inline (i.e. horizontally).
status	Color of the buttons, a valid Bootstrap status : default, primary, info, success, warning, danger.
checkbox	Logical, render radio like checkboxes (with a square shape).
width	The width of the input, e.g. ⁠400px⁠, or ⁠100%⁠.

Value

A set of radio buttons that can be added to a UI definition.

See Also

updateAwesomeRadio

Examples

## Only run examples in interactive R sessions
if (interactive()) {

ui <- fluidPage(
  br(),
  awesomeRadio(
    inputId = "id1", label = "Make a choice:",
    choices = c("graphics", "ggplot2")
  ),
  verbatimTextOutput(outputId = "res1"),
  br(),
  awesomeRadio(
    inputId = "id2", label = "Make a choice:",
    choices = c("base", "dplyr", "data.table"),
    inline = TRUE, status = "danger"
  ),
  verbatimTextOutput(outputId = "res2")
)

server <- function(input, output, session) {

  output$res1 <- renderPrint({
    input$id1
  })

  output$res2 <- renderPrint({
    input$id2
  })

}

shinyApp(ui = ui, server = server)

}

shinyWidgets documentation built on Sept. 23, 2024, 9:07 a.m.