annotate GRsetFromGEO/test-data/GRsetFromGEO.R @ 52:d6c7c3ed3290 draft

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