data-raw/CTRP/CTRP_sampleMetadata.R

filePath <- system.file("extdata/CTRP", "CTRPv2_meta_per_cell_line.txt", package = "AnnotationGx")

rawdata <- data.table::fread(filePath, check.names = T)

CTRP_sampleMetadata <- rawdata[, c("master_ccl_id", "ccl_name")]


usethis::use_data(CTRP_sampleMetadata, overwrite = TRUE)
bhklab/AnnotationGx documentation built on April 3, 2025, 4:27 p.m.