enable: Change the state of a shiny interface element

In dqshiny: Enhance Shiny Apps with Customizable Modules

Description

Those functions can be used to change an elements disabled status.

Usage

enable(ids)

disable(ids)

toggle_state(ids, condition = NULL)

Arguments

ids	Character vector, id(s) of the element to enable/disable.
condition	Condition to be used for toggling the state (TRUE = disabled).

Note

If you have trouble with these functions, please make sure that you either - use any dqshiny element in your UI - load the package with library - use init at the beginning of your UI!

Author(s)

richard.kunze

See Also

Other js handler: add_class, hide

Examples

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

library(shiny)
shinyApp(
  ui = fluidPage(
    actionButton("btn_enable", "Enable"),
    actionButton("btn_disable", "Disable"),
    actionButton("btn_toggle", "Toggle State"),
    actionButton("btn_toggle_cond", "Toggle State with Condition"),
    actionButton("btn_toggle_all", "Toggle All States"),
    checkboxInput("condition", "Disabled"),
    dq_space(), # this is needed to make everything work
    actionButton("example1", "EXAMPLE1"),
    actionButton("example2", "EXAMPLE2"),
    actionButton("example3", "EXAMPLE3")
  ),
  server = function(input, output) {
    observeEvent(input$btn_enable, enable("example1"))
    observeEvent(input$btn_disable, disable("example1"))
    observeEvent(input$btn_toggle, toggle_state("example1"))
    observeEvent(input$btn_toggle_cond,
      toggle_state("example1", input$condition)
    )
    observeEvent(input$btn_toggle_all,
      toggle_state(c("example1", "example2", "example3"))
    )
  }
)

}

dqshiny documentation built on May 2, 2019, 1:43 p.m.