data-raw/drug_gene_queries/pert_names.R

pert_names <- list.files('data-raw/drug_gene_queries/data')

pert_names <- gsub('.rds$', '', pert_names)
pert_names <- gsub('^.+?_res_', '', pert_names)
pert_names <- unique(pert_names)

saveRDS(pert_names, 'data-raw/drug_gene_queries/pert_names.rds')
hms-dbmi/drugseqr documentation built on June 24, 2024, 7:03 a.m.