Nothing
## File Name: zzz.R
## File Version: 0.13
# zzz.R
#
# This function is simply copied from the mice package.
# on attach sirt
.onAttach <- function(libname,pkgname)
{
d <- utils::packageDescription("mdmb")
d1 <- d$Version
packageStartupMessage( paste("* ", d$Package," ", d1," (",d$Date,")",sep="") )
}
version <- function(pkg="mdmb")
{
lib <- dirname( system.file(package=pkg))
d <- utils::packageDescription(pkg)
return( paste(d$Package,d$Version,d$Date,lib))
}
xx <- function(f1, f2)
{
v1 <- paste0( rep(" ",f1), collapse="" )
v2 <- paste0( rep(" ",f2), collapse="" )
res <- paste0( v1, "=", v2)
return(res)
}
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.