Mercurial > repos > artbio > repenrich

diff edgeR_repenrich.R @ 2:15e3e29f310e draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/ARTbio/tools-artbio/tree/master/tools/repenrich commit c89c33e5ea8fc63f3ea5c0f66ebc5fa822ac734b
author artbio
date Tue, 19 Sep 2017 17:23:15 -0400
parents f6f0f1e5e940
children 83b5ea7cc342
line wrap: on
line diff
--- a/edgeR_repenrich.R	Mon Sep 18 17:22:07 2017 -0400
+++ b/edgeR_repenrich.R	Tue Sep 19 17:23:15 2017 -0400
@@ -101,10 +101,10 @@
 filesj <- fromJSON(opt$alignmentB, method = "C", unexpected.escape = "error")
 sizes <- c()
 for (file in filesi) {
-    sizes <- c(sizes, read.delim(file, header=FALSE)[1,1])
+    sizes <- c(sizes, read.delim(file, header=TRUE)[1,1])
     }
 for (file in filesj) {
-    sizes <- c(sizes, read.delim(file, header=FALSE)[1,1])
+    sizes <- c(sizes, read.delim(file, header=TRUE)[1,1])
     }
 
 # build a meta data object