R/zzz.R

In BIFIEsurvey: Tools for Survey Statistics in Educational Assessment

## File Name: zzz.R
## File Version: 0.14
#  zzz.R
#
# This function is simply copied from mice package.


# on attach
.onAttach <- function(libname,pkgname)
{
    d <- utils::packageDescription("BIFIEsurvey")
    packageStartupMessage("|---------------------------------------------------------",
                "--------\n",
                paste("| ",d$Package," ", d$Version," (",d$Date,")",sep=""),
                "\n| http://www.bifie.at                                             ",
                "\n|---------------------------------------------------",
                "--------------\n" )
}

version <- function(pkg="BIFIEsurvey")
{
    lib <- dirname( system.file(package=pkg) )
    d <- utils::packageDescription(pkg)
    return( paste(d$Package,d$Version,d$Date,lib) )
}