Mercurial > repos > sblanck > smagexp
comparison Analyse.R @ 7:f3c021bdc000 draft
use optparse
| author | sblanck | 
|---|---|
| date | Wed, 12 Apr 2017 03:47:05 -0400 | 
| parents | a2b8c2aabeb0 | 
| children | 56267e3293b2 | 
   comparison
  equal
  deleted
  inserted
  replaced
| 6:a2b8c2aabeb0 | 7:f3c021bdc000 | 
|---|---|
| 47 suppressPackageStartupMessages(require(GEOmetadb)) | 47 suppressPackageStartupMessages(require(GEOmetadb)) | 
| 48 suppressPackageStartupMessages(require(limma)) | 48 suppressPackageStartupMessages(require(limma)) | 
| 49 suppressPackageStartupMessages(require(jsonlite)) | 49 suppressPackageStartupMessages(require(jsonlite)) | 
| 50 suppressPackageStartupMessages(require(affy)) | 50 suppressPackageStartupMessages(require(affy)) | 
| 51 suppressPackageStartupMessages(require(dplyr)) | 51 suppressPackageStartupMessages(require(dplyr)) | 
| 52 | |
| 53 cargs<-commandArgs() | |
| 54 cargs<-cargs[(which(cargs=="--args")+1):length(cargs)] | |
| 55 nbargs=length(cargs) | |
| 56 | 52 | 
| 57 load(opt$rdatainput) | 53 load(opt$rdatainput) | 
| 58 targetFile=opt$conditions | 54 targetFile=opt$conditions | 
| 59 condition1Name=opt$selectcondition1 | 55 condition1Name=opt$selectcondition1 | 
| 60 #condition1=opt$condition1 | 56 #condition1=opt$condition1 | 
