view findSNPs/findSNPs.R @ 3:3e5470e49ba5 draft

Uploaded
author testtool
date Sun, 11 Jun 2017 16:31:46 -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)