annotate GRsetFromGEO/GRsetFromGEO.R @ 33:ae82fab7c544 draft

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