Nothing
if (requireNamespace("tinytest", quietly = TRUE) &&
utils::packageVersion("tinytest") >= "1.2.2") {
set.seed(808)
is_at_home <- function() {
identical(tolower(Sys.getenv("TT_AT_HOME")), "true")
}
if (is_at_home()) {
## only run the following tests if "at home" (not at cran)
tinytest::test_package("splines2", ncpu = NULL,
testdir = "rcpp-tests")
}
## always run the following checks
tinytest::test_package("splines2", ncpu = NULL,
side_effects = TRUE)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.