message("\n\nRunning testthat::test_dir")
Sys.setenv(NHLAPI_REMOTE_TESTS = "true")
Sys.setenv(NHLAPI_SELECTED_TESTS = "true")
pkgload::load_all(".")
testResults <- testthat::test_dir(
path = "./tests/testthat",
stop_on_failure = TRUE
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.