##
gs <- newGeneSets(GS=list(1:10, 6:15, 11:20),
geneList=paste("Gene", 1:22, sep=""),
GSNames=c("gs1","gs2","gs3"),
GSDescs=c("test1","test2","test3"),
name="gs examples")
gs
## End
Run the code above in your browser using DataLab