tests/testthat/setup.R

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"

Try the periscope package in your browser

Any scripts or data that you put into this service are public.

periscope documentation built on Nov. 7, 2023, 1:06 a.m.