reactive: Select helpers

In yonicd/shinyselect: Observe Multiple Reactive Elements

Description

These functions allow you to reactive multiple reactive elements based on their names

Usage

reactive_contains(match, valueExpr, input, ignore.case = TRUE)

reactive_starts_with(match, valueExpr, input, ignore.case = TRUE)

reactive_ends_with(match, valueExpr, input, ignore.case = TRUE)

reactive_one_of(elements, valueExpr, input, ignore.case = TRUE)

Arguments

match	character
valueExpr	The expression that produces the return value of the eventReactive. It will be executed within an isolate() scope.
input	reactive object
ignore.case	logical If TRUE ignores case when matching names, Default: TRUE
elements	character vector contains names of elements in the reactive object

Details

The internal shiny::eventReactive is passed a variable var_ that contains the matched element name in the reactive object input. That variable can be defined as a paramter of valueExpr.

Value

observer reference class object

Examples

## Not run: 
if(interactive()){
ui <- shiny::fluidPage(
  shiny::column(width = 6,
     lapply(1:4,FUN = function(x){
       shiny::actionButton(inputId = sprintf('btn_%02d',x),label = 'update')
     })
                )
)

server <- shiny::shinyServer(function(input, output,session) {

  out <- shinyselect::reactive_one_of(c('btn_01','btn_03'),
  valueExpr = function(var_){
    runif(as.numeric(gsub('[^0-9]','',var_)))
  },input)

  shinyselect::observe_contains(match = 'btn_0(1|3)',
                              handlerExpr = function(var_){
                                print(out()[[var_]]())
                                },
                              input = out()
                              )

})

shiny::shinyApp(ui = ui, server = server)
}

## End(Not run)

yonicd/shinyselect documentation built on Nov. 5, 2019, 1:21 p.m.