Nothing
library(testthat)
library(iai)
reporters <- c("check")
# Configure junit if JUNIT_PATH is set
junit_path <- Sys.getenv("JUNIT_PATH", unset = NA)
if (!is.na(junit_path)) {
options(testthat.output_file = Sys.getenv("JUNIT_PATH"))
reporters <- c(reporters, "junit")
}
test_check("iai", reporter = reporters)
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.