data(RcadeSTAT1)
dir <- file.path(system.file("extdata", package="Rcade"), "STAT1")
DE <- getDE(RcadeSTAT1)
DElookup <- list(GeneID="ENSG", logFC="logFC", B="B",
"Genes.Location", "Symbol")
chip <- getChIP(RcadeSTAT1)
annoZone <- getChIP(RcadeSTAT1, what="annoZones")
x <- constructRcadeTable(DE, DElookup, chip, annoZone, annoZoneGeneidName="ENSG", prior.mode="assumeIndependent")
Run the code above in your browser using DataLab