Toggle Switch
We also can create a update function which just a copy of shiny::updateCheckboxInput
but more user friendly.
update_tabler_switch <- function (session, inputId, label = NULL, value = NULL) {
message <- dropNulls(list(label = label, value = value))
session$sendInputMessage(inputId, message)
}
Let’s RUN example 2