Nothing
## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----eval=FALSE---------------------------------------------------------------
# inflate(vignette_name = c("Super title" = "01-Super Vignette Index Entry"))
## ----eval=FALSE---------------------------------------------------------------
# inflate(vignette_name = NA)
## ----eval=FALSE---------------------------------------------------------------
# # The path relative to the "tests/testthat" directory for tests
# the_file <- "my_file.csv"
# if (!file.exists(the_file)) {
# # The path to use during dev in the flat file
# the_file <- file.path("tests", "testthat", the_file)
# if (!file.exists(the_file)) {
# stop(the_file, " does not exist")
# }
# }
#
# my_file <- read.csv(the_file)
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.