test_that("auto_clean deletes files on gc()", {
tmp <- tempfile()
writeLines("abc", tmp)
auto_clean(tmp)
gc()
expect_false(file.exists(tmp))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.