# NOT RUN {
geneFile<-system.file("extdata","GOSlimExample.txt",package="WebGestaltR")
geneList<-read.table(geneFile,header=FALSE,sep="\t",stringsAsFactors=FALSE)
geneList<-as.vector(as.matrix(geneList))
outputFile<-paste(getwd(),"/GOSlimSummary",sep="")
#GOSlimSummary(organism="hsapiens", genelist=geneList,
#outputFile=outputFile, outputType="pdf")
# }
Run the code above in your browser using DataLab