R/zzz.R

In Bishop-Laboratory/RLSeq: RLSeq: An analysis package for R-loop mapping data

.onLoad <- function(libname, pkgname) {
    # Links
    BASE_UCSC <- "http://hgdownload.soe.ucsc.edu/goldenPath"
    RLBASE_URL <- "https://rlbase-data.s3.amazonaws.com"
    RLBASE_S3 <- "s3://rlbase-data"

    # Data
    utils::data("auxdata", package = "RLSeq", envir = parent.env(environment()))
    utils::data(
        "genomeMasks",
        package = "RLSeq",
        envir = parent.env(environment())
    )
    utils::data(
        "available_genomes",
        package = "RLSeq",
        envir = parent.env(environment())
    )
    utils::data(
        "rlsampleTxOl",
        package = "RLSeq",
        envir = parent.env(environment())
    )
    utils::data(
        "randomWindows",
        package = "RLSeq",
        envir = parent.env(environment())
    )
    utils::data(
        "rlbaseNoiseAnalyze",
        package = "RLSeq",
        envir = parent.env(environment())
    )

    # Assign
    assign("BASE_UCSC", BASE_UCSC, envir = parent.env(environment()))
    assign("RLBASE_URL", RLBASE_URL, envir = parent.env(environment()))
    assign("RLBASE_S3", RLBASE_S3, envir = parent.env(environment()))

    # Globals
    utils::globalVariables(".")
}