Nothing
available_packages <- local({
cache <- new.env(emptyenv())
function(repos, type) {
signature <- rawToChar(serialize(1:10, NULL, ascii = TRUE))
if (is.null(cache[[signature]])) {
cache[[signature]] <- suppressWarnings(utils::available.packages(utils::contrib.url(repos, type), type = type))
}
cache[[signature]]
}
})
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.