.onLoad <- function(lib=NULL, pkg=NULL) {
if(is.null(pkg))
pkg <- "CALINE"
library.dynam("CALINE", pkg, lib)
ver <- utils::packageDescription(pkg, field="Version")
packageStartupMessage("This is ", pkg, " ", ver)
}
.onUnload <- function(lib) library.dynam.unload("CALINE", lib)
.onAttach <- function(lib, package) {}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.