Nothing
.onLoad <- function(lib, pkg){
if(grepl("darwin", R.Version()$platform)){
path <- Sys.getenv("PATH")
gpgbin <- file.path(lib, pkg, "bin")
if(file.exists(gpgbin) && !grepl(gpgbin, path, fixed = TRUE)){
Sys.setenv(PATH = paste(path, normalizePath(gpgbin), sep = ":"))
}
}
gpg_restart(silent = TRUE)
}
.onAttach <- function(lib, pkg){
engine <- gpg_info()
packageStartupMessage("Found GPG ", engine$version, " (gpgme ", engine$gpgme,"). Using keyring: ", engine$home)
}
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.