# HG changeset patch
# User testtool
# Date 1500907183 14400
# Node ID 88d2c717105e76d5676183e90c8ced72a140d1f8
# Parent  10996f6ddcb527cc67707cad9c0643477a1b6e92
Uploaded

diff -r 10996f6ddcb5 -r 88d2c717105e GRsetFromGEO/GRsetFromGEO.R
--- a/GRsetFromGEO/GRsetFromGEO.R	Mon Jul 24 10:39:17 2017 -0400
+++ b/GRsetFromGEO/GRsetFromGEO.R	Mon Jul 24 10:39:43 2017 -0400
@@ -1,6 +1,3 @@
-require("IlluminaHumanMethylation450kanno.ilmn12.hg19", quietly = TRUE)
-require("minfi", quietly = TRUE)
-
 options(warn = -1)
 options('download.file.method.GEOquery' = 'wget')
 options('GEOquery.inmemory.gpl'=FALSE)
@@ -9,7 +6,8 @@
 args <- commandArgs(trailingOnly = TRUE)
 input = args[1] 
 output = args[2] 
-
+input <- 'GSE51547'
 GRset <- getGenomicRatioSetFromGEO(input)
 
 save(GRset,file = output)
+