Nothing
.onAttach <- function( libname, pkgname ) {
packageStartupMessage(
pkgname ,
"-" ,
utils::packageVersion(pkgname, libname),
" provided by Decision Patterns\n" ,
domain = NA
)
# THIS SETS THE DEFAULTS FOR dummy.classes
if( is.null( getOption("dummy.classes") ) )
options( "dummy.classes" = c("factor","character") )
}
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.