## File Name: zzz.R
## File Version: 0.02
# zzz.R
#
# This function is simply copied from the mice package.
# on attach sirt
.onAttach <- function(libname,pkgname)
{
d <- utils::packageDescription("SRMData")
d1 <- d$Version
packageStartupMessage(
paste("* " , d$Package," " , d1 ," (",d$Date,")",sep="") )
}
version <- function(pkg="SRMData")
{
lib <- dirname( system.file(package = pkg))
d <- utils::packageDescription(pkg)
return( paste(d$Package,d$Version,d$Date,lib))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.