Nothing
testthat::test_that("package initialization", {
# reset origin options
nms <- names(options())
nms <- nms[grepl("^origin\\.", nms)]
do.call(options, stats::setNames(lapply(nms, function(x) NULL), nms))
testthat::expect_null(.onLoad())
testthat::expect_null(.onLoad())
})
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.