Как программно изменить значение R-Shiny "checkboxinput" на FALSE / TRUE?

Question

Я хочу изменить значение checkboxinput на FALSE / TRUE во время выполнения.Как я могу это сделать?

checkboxInput(inputId = "smoother", label = "Overlay smooth trend line", value = FALSE)

Answer 1

Вы можете использовать updateCheckboxInput(). Смотрите пример ниже:

Воспроизводимый пример:

library(shiny)
ui <- fluidPage(
  actionButton(
    inputId = "check",
    label = "update checkbox"
  ),
  checkboxInput(
    inputId =  "checkbox", 
    label = "Input checkbox"
  )
)

server <- function(input, output, session) {
  observeEvent(
    eventExpr = input$check, {
      updatedValue = !input$checkbox

      updateCheckboxInput(
        session =  session,
        inputId =  "checkbox", 
        value = updatedValue
      )
    }
  )
}

shinyApp(ui, server)