THISPKG <- "ITHIM"
.onAttach <- function(libname, pkgname) {
version <- packageDescription("ITHIM", fields="Version")
#date <- packageDescription("ITHIM", fields="Date")
packageStartupMessage(paste("Welcome to ITHIM version ", version, ".\n",
"~~~~~~~~~~~~~~~~~", "\n",
">()_ >()_ >()_ ", "\n",
" (__) (__) (__)", "\n",
"~~~~~~~~~~~~~~~~~", sep = "" ) )
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.