test_that("Replacement works.", {
expect_equal(list_empty_NA(vector("list", 3)),
rep(list(as.character(NA)), 3))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.