library(testthat)
library(wham)
# Check that test results are available locally
path_to_examples <- system.file("extdata", package="wham")
file.exists(file.path(path_to_examples,"ex1_test_results.rds"))
testthat::test_check("wham")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.