view minfi_qc.R @ 1:88f94d4c59c4 draft

planemo upload for repository https://github.com/kpbioteam/minfi_qc commit bb1622e57b83aa260687997e48fc4ec7011f8642
author kpbioteam
date Wed, 23 May 2018 06:36:52 -0400
parents 7bd0d3c7a8d3
children
line wrap: on
line source

require("minfi", quietly = TRUE)

args <- commandArgs(trailingOnly = TRUE)

input = args[1] 
output1 = args[2]
output2 = args[3]

MSet <- get(load(input))

qc <- getQC(MSet)

write.table(qc, output1)

png(output2)
plotQC(qc)
dev.off()