Nothing
.onAttach <- function(...) {
if (!interactive()) {return()}
startupmessage <- c(
"Developed at the Institute for Defense Analyses (IDA). Type skprGUI() and click tutorial for an introduction.",
"Questions? Contact: tylermw@gmail.com, or visit http://github.com/tylermorganwall/skpr"
)
packageStartupMessage(paste(strwrap(startupmessage), collapse = "\n"))
}
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.