R/zzz.R

Defines functions .onLoad .onAttach

.onLoad <- function(libname, pkgname) {
    ## Initialize Jar
    rJava::.jpackage(pkgname, lib.loc = libname)
    rJava::.jaddClassPath(dir(file.path(getwd(), "inst/java"), full.names = TRUE))
    # rJava::.jcall(
    #     "net.maizegenetics/util/LoggingUtils",
    #     "V",
    #     "setupLoggingOff"
    # )
}

.onAttach <- function(libname, pkgname){
    msg <- paste0(
        "Welcome to rTASSEL (version ", utils::packageVersion("rTASSEL"), ")", "\n",
        " \u2022 Consider starting a TASSEL log file (see ?startLogger())", "\n",
        " \u2022 Additional memory can be added using the following:", "\n",
        "     options(java.parameters = c(\"-Xmx<>\"))", "\n"
    )
    packageStartupMessage(msg)
}
maize-genetics/bioconductor_test documentation built on Nov. 4, 2019, 5:19 p.m.