Nothing
test_that("import_pattern imports patterns of right length", {
expect_equal(
nchar(import_pattern("../rmd/sample_pattern.Rmd")),
53
)
})
test_that("import_pattern doesn't fail silently", {
expect_error(import_pattern())
expect_error(import_pattern(53))
expect_error(import_pattern(iris))
expect_warning(import_pattern("../rmd/empty_file.Rmd"))
})
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.