powered by
glossiMarginal(pval, set)
GeneSetCollection
GLOSSIResult
set.seed(30) pvals <- runif(100) names(pvals) <- paste0("rs", 1:100) snpGS5 <- GeneSet(geneIds=names(pvals)[1:5], setName="set5") res <- glossiMarginal (pvals, snpGS5)
Run the code above in your browser using DataLab