| 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)