Nothing
all.pkgs <- c("testthat", "data.table", "magrittr", "withr")
if (all(vapply(all.pkgs, requireNamespace, logical(1L), quietly = TRUE))) {
library(testthat)
library(grattan)
library(hutils)
library(data.table)
library(magrittr)
setDTthreads(1L)
if (identical(Sys.getenv("CIRCLECI"), "true")) {
test_check("grattan",
reporter = JunitReporter$new(file = "junit_result.xml"))
} else {
test_check("grattan", reporter = LocationReporter)
}
}
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.