# HG changeset patch
# User testtool
# Date 1502360376 14400
# Node ID d6c7c3ed3290bdf60e4fd224148f5a29c5fcfb11
# Parent  55c57fa3f67956c20ebbf6d9b820d898798762c5
Uploaded

diff -r 55c57fa3f679 -r d6c7c3ed3290 GRsetFromGEO/test-data/GRsetFromGEO.R
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/GRsetFromGEO/test-data/GRsetFromGEO.R	Thu Aug 10 06:19:36 2017 -0400
@@ -0,0 +1,16 @@
+require(minfi, quietly = TRUE)
+
+options(warn = -1)
+options('download.file.method.GEOquery' = 'wget')
+options('GEOquery.inmemory.gpl'=FALSE)
+
+
+args <- commandArgs(trailingOnly = TRUE)
+input = args[1] 
+output = args[2] 
+
+GRset <- getGenomicRatioSetFromGEO(input)
+
+save(GRset,file = output)
+
+