annotate GRsetFromGEO/GRsetFromGEO.R @ 21:07f0fc6e4d1d draft

Uploaded
author testtool
date Mon, 03 Jul 2017 07:14:02 -0400
parents 3431c6054674
children 71a8c9b37d45
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
14
c3b28b232e64 Uploaded
testtool
parents: 13
diff changeset
1 require("minfi", quietly = TRUE)
c3b28b232e64 Uploaded
testtool
parents: 13
diff changeset
2
5
7511130b5068 Uploaded
testtool
parents:
diff changeset
3 options(warn = -1)
21
07f0fc6e4d1d Uploaded
testtool
parents: 17
diff changeset
4 options('download.file.method.GEOquery' = 'libcurl')
07f0fc6e4d1d Uploaded
testtool
parents: 17
diff changeset
5 options('GEOquery.inmemory.gpl'=FALSE)
17
3431c6054674 Uploaded
testtool
parents: 16
diff changeset
6
5
7511130b5068 Uploaded
testtool
parents:
diff changeset
7
7511130b5068 Uploaded
testtool
parents:
diff changeset
8 args <- commandArgs(trailingOnly = TRUE)
16
ceaf71c74547 Uploaded
testtool
parents: 14
diff changeset
9 input = args[1]
5
7511130b5068 Uploaded
testtool
parents:
diff changeset
10 output = args[2]
7511130b5068 Uploaded
testtool
parents:
diff changeset
11
16
ceaf71c74547 Uploaded
testtool
parents: 14
diff changeset
12 GRset <- getGenomicRatioSetFromGEO(input)
5
7511130b5068 Uploaded
testtool
parents:
diff changeset
13
7511130b5068 Uploaded
testtool
parents:
diff changeset
14 save(GRset,file = output)