view minfi_qc.R @ 0:7bd0d3c7a8d3 draft

planemo upload
author kpbioteam
date Tue, 06 Feb 2018 05:40:33 -0500
parents
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()