Mercurial > repos > artbio > small_rna_maps

diff small_rna_maps.r @ 27:fe1a9cfaf5c3 draft
planemo upload for repository https://github.com/ARTbio/tools-artbio/tree/master/tools/small_rna_maps commit d234ef45deb84f70c85b3372b8e0137df0be4e29
author: artbio
date: Wed, 24 Apr 2019 11:18:24 -0400
parents: b585cb347a26
children: 183bf49fe77c
--- a/small_rna_maps.r	Sun Apr 14 14:43:44 2019 -0400
+++ b/small_rna_maps.r	Wed Apr 24 11:18:24 2019 -0400
@@ -28,6 +28,7 @@
 # data frames implementation
 ## first table
 Table = read.delim(args$first_dataframe, header=T, row.names=NULL)
+colnames(Table)[1] <- "Dataset"
 if (args$first_plot_method == "Counts" | args$first_plot_method == "Size") {
   Table <- within(Table, Counts[Polarity=="R"] <- (Counts[Polarity=="R"]*-1))
 }
@@ -52,6 +53,7 @@
 # second table
 if (args$extra_plot_method != '') {
   ExtraTable=read.delim(args$extra_dataframe, header=T, row.names=NULL)
+  colnames(ExtraTable)[1] <- "Dataset"
   if (args$extra_plot_method == "Counts" | args$extra_plot_method=='Size') {
     ExtraTable <- within(ExtraTable, Counts[Polarity=="R"] <- (Counts[Polarity=="R"]*-1))
   }