get_required_internal <- function(x) {
do.call(c, lapply(x, shinysurveys:::getID))
}
assignInNamespace(
"getRequired_internal",
get_required_internal,
ns = "shinysurveys"
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.