R/inputs.R
update_checkbox_group_input_386.Rd
Change the value of a checkbox group input on the client
update_checkbox_group_input_386( session, inputId, label = NULL, choices = NULL, selected = NULL, choiceNames = NULL, choiceValues = NULL )
session | The session object passed to function given to shinyServer. |
---|---|
inputId | The |
label | Display label for the control, or |
choices | List of values to show checkboxes for. If elements of the list
are named then that name rather than the value is displayed to the user. If
this argument is provided, then |
selected | The values that should be initially selected, if any. |
choiceNames | List of names and values, respectively,
that are displayed to the user in the app and correspond to the each
choice (for this reason, |
choiceValues | List of names and values, respectively,
that are displayed to the user in the app and correspond to the each
choice (for this reason, |
if (interactive()) { ui <- page_386( p("The first radio button group controls the second"), checkbox_group_input_386("inCheckboxGroup", "Input radio buttons", c("Item A", "Item B", "Item C")), checkbox_group_input_386("inCheckboxGroup2", "Input radio buttons 2", c("Item A", "Item B", "Item C")) ) server <- function(input, output, session) { observe({ x <- input$inCheckboxGroup # Can use character(0) to remove all choices if (is.null(x)) x <- character(0) # Can also set the label and select items update_checkbox_group_input_386(session, "inCheckboxGroup2", label = paste("Checkboxgroup label", length(x)), choices = x, selected = x ) }) } shinyApp(ui, server) }