Mercurial > repos > kpbioteam > minfi_getbeta

diff minfi_getbeta.R @ 0:ab291e211089 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload
author kpbioteam
date Mon, 05 Feb 2018 08:51:35 -0500
parents
children 4953a5a6c006
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/minfi_getbeta.R	Mon Feb 05 08:51:35 2018 -0500
@@ -0,0 +1,12 @@
+require("minfi", quietly = TRUE)
+
+args <- commandArgs(trailingOnly = TRUE)
+
+input = args[1] 
+output = args[2]
+
+RSet <- get(load(input))
+
+beta <- getBeta(RSet)
+
+write.table(beta, output)