view findSNP/findSNPs.R @ 0:803decff7ac8 draft

Uploaded
author testtool
date Sun, 11 Jun 2017 10:00:48 -0400
parents
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)