comparison getGEO/getGEO.R @ 19:f49d9ccacc73 draft

Uploaded
author testtool
date Mon, 06 Feb 2017 05:36:14 -0500
parents fafbd5bb1f05
children
comparison
equal deleted inserted replaced
18:f1a3a417a145 19:f49d9ccacc73
3 require("GEOquery", quietly = TRUE) 3 require("GEOquery", quietly = TRUE)
4 require("rtracklayer", quietly = TRUE) 4 require("rtracklayer", quietly = TRUE)
5 require("FDb.InfiniumMethylation.hg19", quietly = TRUE) 5 require("FDb.InfiniumMethylation.hg19", quietly = TRUE)
6 6
7 options(warn = -1) 7 options(warn = -1)
8 options("download.file.method"="wget")
8 args <- commandArgs(trailingOnly = TRUE) 9 args <- commandArgs(trailingOnly = TRUE)
9 GSMTable = args[1] 10 GSMTable = args[1]
10 MetaTable = args[2] 11 MetaTable = args[2]
11 IlmnTable = args[3] 12 IlmnTable = args[3]
12 gmTable = args[4] 13 gmTable = args[4]