library(dipsaus)
# Most recommended usage
getInputBinding('compoundInput2', pkg = 'dipsaus')
# Other usages
getInputBinding('shiny::textInput')
getInputBinding(shiny::textInput)
getInputBinding(compoundInput2, pkg = 'dipsaus')
# Bad usage, raise errors in some cases
if (FALSE) {
## You need to library(shiny), or set envir=asNamespace('shiny'), or pkg='shiny'
getInputBinding('textInput')
getInputBinding(textInput) # also fails
## Always fails
getInputBinding('dipsaus::compoundInput2', pkg = 'dipsaus')
}
Run the code above in your browser using DataLab