data-raw/create_demo_data.R

In Anderson-Lab/ComplementaryDomainPrioritization: ComplementaryDomainPrioritization and Filtering

#source('GeneListPrioritization/R/loading.R')

#file = "GeneListPrioritization/inst/extdata/TCGA_protein.csv"
#TCGA.protein = load.protein.data(file,3)
#use_data(TCGA.protein, pkg="GeneListPrioritization",overwrite=T)
#save(list=c('TCGA.protein','yes.label'),file='GeneListPrioritization/data/TCGA.protein.RData')

#file = "GeneListPrioritization/inst/extdata/TCGA_rna.csv"
#TCGA.rna = load.gene.data(file,3)
#use_data(TCGA.rna, pkg="GeneListPrioritization",overwrite=T)
#yes.label = "YES"
#save(list=c('TCGA.rna','yes.label'),file='GeneListPrioritization/data/TCGA.rna.RData')

#file = "GeneListPrioritization/inst/extdata/Uzozie_protein.csv"
#Uzozie.protein = load.protein.data(file,5)
#use_data(Uzozie.protein, pkg="GeneListPrioritization",overwrite=T)
#yes.label = 'adenoma'
#save(list=c('Uzozie.protein','yes.label'),file='GeneListPrioritization/data/Uzozie.protein.RData')

#file = "GeneListPrioritization/inst/extdata/Cattaneo_array.csv"
#Cattaneo.array = load.gene.data(file,5)
#use_data(Cattaneo.array, pkg="GeneListPrioritization",overwrite=T)
#yes.label = 'adenoma'
#save(list=c('Cattaneo.array','yes.label'),file='GeneListPrioritization/data/Cattaneo.array.RData')