data(sampleObj)
geneset <- c("BANK1","CD22","CD79A","CD19","IGHD","IGHG3","IGHM")
#test is conditional on availability of suggested packages
if (requireNamespace("fgsea", quietly=TRUE) &
requireNamespace("msigdbr", quietly=TRUE)) {
gsea_res <- runGSEA(geneset,
universe=rownames(sampleObj),
category = "C8")
}
Run the code above in your browser using DataLab