Nothing
.onAttach <- function(...) {
diveRpkgs <- diveRcore()
needed <- diveRpkgs[!is_attached(diveRpkgs)]
if (length(needed) == 0)
return()
diveR_attach()
}
is_attached <- function(x) {
paste0("package:", x) %in% search()
}
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.