test_that("isLoaded() and setLoaded() work as expected", {
name <- "abc"
expect_false(isLoaded(name))
setLoaded(name)
expect_true(isLoaded(name))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.