annotate GRsetFromGEO.R @ 50:d793e03b4da1 draft

Uploaded
author testtool
date Thu, 10 Aug 2017 06:19:14 -0400
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
50
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
1 require(minfi, quietly = TRUE)
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
2
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
3 options(warn = -1)
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
4 options('download.file.method.GEOquery' = 'wget')
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
5 options('GEOquery.inmemory.gpl'=FALSE)
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
6
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
7
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
8 args <- commandArgs(trailingOnly = TRUE)
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
9 input = args[1]
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
10 output = args[2]
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
11
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
12 GRset <- getGenomicRatioSetFromGEO(input)
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
13
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
14 save(GRset,file = output)
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
15
d793e03b4da1 Uploaded
testtool
parents:
diff changeset
16