Mercurial > repos > testtool > geo_data

diff getGRsetFromGEO/getGRsetFromGEO.R @ 11:983651783ce9 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author testtool
date Wed, 22 Mar 2017 09:01:06 -0400
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/getGRsetFromGEO/getGRsetFromGEO.R	Wed Mar 22 09:01:06 2017 -0400
@@ -0,0 +1,14 @@
+require("minfi", quietly = TRUE)
+
+options(warn = -1)
+options("download.file.method"="wget")
+
+args <- commandArgs(trailingOnly = TRUE)
+
+GSE = args[1] #GSE51547
+output = args[2] #output <- ("GEOdata.txt")
+
+GEO <- getGenomicRatioSetFromGEO(GSE)
+
+save(GEO, ascii=TRUE, file=output)
+