# HG changeset patch
# User sblanck
# Date 1491983225 14400
# Node ID f3c021bdc000541a69235606022f0a048c123935
# Parent  a2b8c2aabeb083659ef398c52db060c6c8480ff9
use optparse

diff -r a2b8c2aabeb0 -r f3c021bdc000 Analyse.R
--- a/Analyse.R	Wed Apr 12 03:45:25 2017 -0400
+++ b/Analyse.R	Wed Apr 12 03:47:05 2017 -0400
@@ -50,10 +50,6 @@
 suppressPackageStartupMessages(require(affy))
 suppressPackageStartupMessages(require(dplyr))
 
-cargs<-commandArgs()
-cargs<-cargs[(which(cargs=="--args")+1):length(cargs)]
-nbargs=length(cargs)
-
 load(opt$rdatainput)
 targetFile=opt$conditions
 condition1Name=opt$selectcondition1