# \donttest{
library(RCPA)
library(SummarizedExperiment)
affyDEExperiment <- loadData("affyDEExperiment")
agilDEExperiment <- loadData("agilDEExperiment")
RNASeqDEExperiment <- loadData("RNASeqDEExperiment")
metaDEResult <- RCPA::runDEMetaAnalysis(list(
rowData(affyDEExperiment)[1:1000,],
rowData(agilDEExperiment)[1:1000,],
rowData(RNASeqDEExperiment)[1:1000,]
), method = "stouffer")
# }
Run the code above in your browser using DataLab