R/onload.R

'.onLoad' <- function(lib, pkg="lava.tobit") {
    lava::addhook("lava.tobit.color.hook","color.hooks")
    lava::addhook("lava.tobit.sim.hook","sim.hooks")
    lava::addhook("lava.tobit.init.hook","init.hooks")

    lava::lava.options(tobitAlgorithm=mvtnorm::GenzBretz(abseps=1e-5),
                       tobitseed=1, threshold=1)
}

'.onAttach' <- function(lib, pkg="lava.tobit") {
    desc <- utils::packageDescription(pkg)
    packageStartupMessage(desc$Package, " version ",desc$Version)
}

Try the lava.tobit package in your browser

Any scripts or data that you put into this service are public.

lava.tobit documentation built on May 2, 2019, 3:26 p.m.