Nothing
#####
## Collection of internal functions used
##
#####
.onAttach <- function(...){
packageStartupMessage(paste("********** MAMS Version",
packageDescription("MAMS")$Version), " ********** \n")
packageStartupMessage(paste0(
"Type MAMSNews() to see new features/changes/bug fixes.\n",
"Type help(MAMS) for an overview of the package.\n"))
#if(as.numeric(R.Version()$major) >= 2 & as.numeric(R.Version()$minor) < 10) {packageStartupMessage(paste("The help functions for this package might not work properly. Please upgrade R to Version 2.10 or above to fix this problem.\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.