R/GSEA_SFWrapper.R

In scfurl/probedeeper: Making the Analysis of Microarray Data More Efficient

# ###GSEA.SF###
# os<-Sys.info()['sysname']
# if(os=="Windows"){rootpath<-paste("C:/Users/",Sys.getenv("USERNAME"), "/Dropbox (Kean Lab)/People/Scott Furlan", sep="")} else {rootpath<-"~/Dropbox (Kean Lab)/People/Scott Furlan"}
# workpath<-"/Bioinformatics Resources"
# path<-paste(rootpath, workpath, sep="")
# setwd(path)
# source("GSEA.SF/GSEA.Main.R")
# source("GSEA.SF/GSEA.Aux1.R")
# source("GSEA.SF/GSEA.Aux2.R")
# source("GSEA.SF/GSEA.AnalyzeSets.R")
#
# setClass("GSEAObject", representation(
#   Contents="list",
#   #Contains content data
#   ODFHeader="list",
#   #Contains metadata
#   ODFData="data.frame",
#   GCTData="data.frame"))