test_that("store() works", {
f <- kwb.fakin:::store
xyz <- 1
capture.output(result <- f(xyz, "my-script"))
expect_identical(result, NULL)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.