Nothing
test_that("get_translation", {
testthat::expect_error(get_translation(local_path = ".", language = "german"), NA)
pdfs <- list.files(path = ".", pattern = "*.pdf", full.names = TRUE)
purrr::map(pdfs, fs::file_delete)
})
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.