R/zzz.R

In julaiti/MSPC: Multiple Sample Peak Calling: Using combined evidence from replicates to evaluate ChIP-seq peaks

#' R CMD check NOTE avoidance
#'
#' @importFrom utils globalVariables

.onLoad <- function(libname = find.package("MSPC"), pkgname = "MSPC"){
    # R CMD check Note avoidance
    if(getRversion() >= "2.15.1")
        utils::globalVariables(
            c(".","p.value","peakStringency","Catg", "adjust.pvalue",
              "id","Replicate", "isConfirmed","n","Sample","Output")
        )
    invisible()
}

.onAttach = function(libname, pkgname) {
    msg = "Welcome to 'MSPC'. Here is the initialization of MSPC package"
    msg = strwrap(msg, exdent=4, indent=4)
    packageStartupMessage(paste(msg, collapse="\n"), appendLF=TRUE)
}