library(testthat)
# Global internal data
load('data/thcasaa.rda')
test_that("OK: ggmsa::ggmsa(thcasaa) works", {
ggmsa:ggmsa(thcasaa[4:7])
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.