R/zzz.R

In Winnie09/SCATEData: Data for SCATE (Single-cell ATAC-seq Signal Extraction and Enhancement)

.onLoad <- function(libname, pkgname) {
  fl <- system.file("extdata", "metadata.csv", package = "SCATEData")
  titles <- read.csv(fl, stringsAsFactors = FALSE)$Title
  createHubAccessors(pkgname, titles)
}