# load data
data(human.data)
data(mouse.data)
data(map.data)
data(gset.data)
# make dex.set object for human data
dex.set.human <- make.dex.set.object(human.data,
comp.var=2,
comp.def="human.tumor.typeD-other.human.tumors",
gset.collection=gset.data)
# make dex.set object for mouse data
dex.set.mouse <- make.dex.set.object(mouse.data,
comp.var=2,
comp.def="mouse.tumor-mouse.control",
gset.collection=NULL)
# call agdex routine
res <- agdex(dex.set.human,dex.set.mouse,map.data,min.nperms=5,max.nperms=10)
# see visualization result of the whole genome
agdex.scatterplot(res, gset.id=NULL)
# see visualization result of a specific gene-set
agdex.scatterplot(res, gset.id="DNA_CATABOLIC_PROCESS")
# get the gene-set result of a specific gene-set
gset.detail <- get.gset.result.details(res, gset.ids="DNA_CATABOLIC_PROCESS", alpha=0.01)
Run the code above in your browser using DataLab