view findSNPs/findSNPs.R @ 4:c70d0aba0e82 draft

Uploaded
author testtool
date Sun, 11 Jun 2017 16:39:15 -0400
parents 15bb9a34d924
children
line wrap: on
line source

require("minfi", quietly = TRUE)

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

args <- commandArgs(trailingOnly = TRUE)

input = args[1]
output = args[2]

GRset <- get(load(input))

snps <- getSnpInfo(GRset)

write.table(snps, output)