inst/extdata/testdata/create-test-MultiGSEAResult.R

library(multiGSEA)

vm <- exampleExpressionSet(do.voom=TRUE)
gsl <- exampleGeneSets()
gsd <- conform(GeneSetDb(gsl), vm)
x <- multiGSEA(gsd, vm, vm$design, methods=c('camera', 'fry'))
path <- 'inst/extdata/testdata/test-MultiGSEAResult.rds'
saveRDS(x, path)
lianos/multiGSEA documentation built on Nov. 17, 2020, 1:26 p.m.