Nothing
withr::local_dir(path)
test_that("use_na copies template file to destination folder", {
file_path <- file.path(getwd(), "temp", "utils-na.R")
expect_null(use_na(path = "temp", export = TRUE))
expect_true(file.exists(file_path))
expect_match(read_lines(file_path), "export")
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.