R/globals.r

In perishky/meffonym: DNA methylation exposure and phenotypic archive

.onLoad <- function(libname, pkgname) {
    env <- parent.env(environment())

    cat("loading models ...\n")
    assign("models.global", new.env(), envir=env)
    load.models(pkgname)

    cat("load horvath standard ...\n")
    standard <- load.horvath.standard(pkgname)
    assign("horvath.standard", standard, envir=env)

    cat("load DunedinPACE standard ...\n")
    standard <- load.dunedinpace.standard(pkgname)
    assign("dunedinpace.standard",standard, envir=env)
}