Nothing
if (requireNamespace("testthat")) {
library("testthat")
library("popEpi")
library("data.table")
using_r_devel <- grepl(pattern = "devel", x = R.version$status)
if (using_r_devel) {
## memory leak problem in data.table 1.11.2 in R-devel (3.6.0 atm)
requireNamespace("data.table")
data.table::setDTthreads(threads = 1L)
}
testthat::test_check("popEpi")
}
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.