match_calls: Recursively match calls and modify arguments

In dipsaus: A Dipping Sauce for Data Analysis and Visualizations

Recursively match calls and modify arguments

Description

Recursively match calls and modify arguments

Usage

match_calls(
  call,
  recursive = TRUE,
  replace_args = list(),
  quoted = FALSE,
  envir = parent.frame(),
  ...
)

Arguments

call	an R expression
recursive	logical, recursively match calls, default is true
replace_args	named list of functions, see examples
quoted	logical, is call quoted
envir	which environment should call be evaluated
...	other parameters passing to match.call

Value

A nested call with all arguments matched

Examples

library(dipsaus); library(shiny)

# In shiny modules, we might want to add ns() to inputIds
# In this example, textInput(id) will become textInput(ns(id))
match_calls(lapply(1:20, function(i){
  textInput(paste('id_', i), paste('Label ', i))
}), replace_args = list(
  inputId = function(arg, call){ as.call(list(quote(ns), arg)) }
))

dipsaus documentation built on June 27, 2024, 5:10 p.m.