R/zzz.R

Defines functions .onAttach .onLoad

.onAttach <- function(libname, pkgname) {
  packageStartupMessage("seurathelpeR contains convenience scripts for working with the Seurat v3 package.")
}

.onLoad <- function(libname, pkgname) {
  op <- options()
  op.devtools <- list(
    devtools.path = "~/R-dev",
    devtools.install.args = "",
    devtools.name = "Kin Lau",
    devtools.desc.author = "Kin Lau <kin.lau@vai.org> [aut, cre]",
    devtools.desc.license = "GPL-3",
    devtools.desc.suggests = NULL,
    devtools.desc = list()
  )
  toset <- !(names(op.devtools) %in% names(op))
  if (any(toset)) options(op.devtools[toset])

  invisible()
}
genomics-kl/seurathelpeR documentation built on Nov. 4, 2019, 1:04 p.m.