require("minfi", quietly = TRUE)

options(warn = -1)
options("download.file.method"="wget")

args <- commandArgs(trailingOnly = TRUE)
GSE = args[1] 
output = args[2] 

GRset <- getGenomicRatioSetFromGEO(GSE)
a<-"stefan"
write.table(a,output)

#save(GRset,file = output)