# NOT RUN {
if (interactive()) {
system.file(package = "shinyobjects", "Rmd/test_dashboard.Rmd") %>%
load_reactive_objects()
system.file(package = "shinyobjects", "Rmd/test_dashboard_no_inputs.Rmd") %>%
load_reactive_objects()
system.file(package = "shinyobjects", "Rmd/test_dashboard_missing_inputs.Rmd") %>%
load_reactive_objects()
}
# }
Run the code above in your browser using DataLab