Nothing
.onAttach <- function(libname, pkgname) {
packageStartupMessage("The littler package provides 'r' as a binary.")
packageStartupMessage("See 'vignette(\"littler-examples\") for several usage illustrations,")
packageStartupMessage("and see 'vignette(\"littler-faq\") for some basic questions.")
if (Sys.info()[["sysname"]] %in% c("Linux", "Darwin")) { # nocov start
if (unname(Sys.which("r")) == "") {
loc <- normalizePath(system.file("bin", .Platform$r_arch, "r", package="littler"))
packageStartupMessage("You could link to the 'r' binary installed in\n'", loc, "'\n",
"from '/usr/local/bin' in order to use 'r' for scripting.",
"See the 'vignette(\"littler-faq\")' for more details.")
if (Sys.info()[["sysname"]] == "Darwin")
packageStartupMessage("On maxOS, 'r' and 'R' are the same so 'lr' is a possible alternate name for littler.")
} # nocov end
}
}
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.