inst/analyseSingle2GrpGSEA/testReturnValues.R

In protViz/fgcz.gsea.ora: ORA, sigORA and GSEA functionalities for proteomic data

args = commandArgs(trailingOnly = TRUE)
what <- args[1]
if (what == "q") {
  print("Quitting")
  q(status = 12)
} else if (what == "s") {
  stop("I am stopping")
}else if (what == "run") {
  print("hello")
}