loadRequiredData {psichomics} | R Documentation |
Missing information modal template
loadRequiredData(modal = NULL) missingDataModal(session, dataType, buttonId) missingDataGuide(dataType)
modal |
Character: modal identifier |
session |
Shiny session |
dataType |
Character: type of data missing |
buttonId |
Character: identifier of button to take user to load missing data |
NULL (this function is used to modify the Shiny session's state)
## Not run: if (shiny::isRunning()) { session <- session$ns buttonInput <- "takeMeThere" buttonId <- ns(buttonInput) dataType <- "Inclusion levels" missingDataModal(session, buttonId, dataType) observeEvent(input[[buttonInput]], missingDataGuide(dataType)) } ## End(Not run)