User interface for the sandtablR workbench
Examples
if (requireNamespace("shiny", quietly = TRUE) &&
requireNamespace("bslib", quietly = TRUE)) {
ui <- sdt_app_ui()
class(ui)
}
#> [1] "bslib_page" "shiny.tag.list" "list"
User interface for the sandtablR workbench
if (requireNamespace("shiny", quietly = TRUE) &&
requireNamespace("bslib", quietly = TRUE)) {
ui <- sdt_app_ui()
class(ui)
}
#> [1] "bslib_page" "shiny.tag.list" "list"