diff filter_genes.R @ 1:5d2304b09f58 draft

planemo upload for repository https://github.com/ARTbio/tools-artbio/tree/master/tools/gsc_filter_genes commit d9e43e514d5fe7bbc7205a52ccb3e4faef50e856
author artbio
date Mon, 24 Jun 2019 18:07:05 -0400
parents f689c4ea8c43
children afe949d332b3
line wrap: on
line diff
--- a/filter_genes.R	Mon Jun 24 13:38:10 2019 -0400
+++ b/filter_genes.R	Mon Jun 24 18:07:05 2019 -0400
@@ -81,6 +81,7 @@
 
 # Filter matrix
 data.counts <- data.counts[kept_genes,]
+data.counts <- cbind(Genes=rownames(data.counts), data.counts)
 
 # Save filtered matrix
 write.table(
@@ -89,5 +90,5 @@
   sep = "\t",
   quote = F,
   col.names = T,
-  row.names = T
+  row.names = F
 )
\ No newline at end of file