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 |
