require(testthat)
require(shiny)
require(periscope)
require(shinydashboardPlus)
require(ggplot2)
if (interactive()) {
test_source_path <- "periscope/R"
invisible(
lapply(list.files(test_source_path),
FUN = function(x) source(file.path(test_source_path, x))))
rm(test_source_path)
}
# indicator for shinydashboardPlus version
t_sdp_old <- utils::packageVersion('shinydashboardPlus') < "2"
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.