Nothing
.onLoad <- function(libname, pkgname) {
withr::with_preserve_seed({
# create a new random permutation every time we load
adjective_animal <<- sample(adjective_animal, size = length(adjective_animal))
})
invisible()
}
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.