diff compute_kegg_pathways.R @ 3:0d5c21cc29f7 draft

planemo upload commit 0be58bb700f64de6792a7234a11675bae2755e8f-dirty
author proteore
date Thu, 13 Sep 2018 03:24:24 -0400
parents 0fe3cb50fbf6
children
line wrap: on
line diff
--- a/compute_kegg_pathways.R	Fri Sep 07 10:21:21 2018 -0400
+++ b/compute_kegg_pathways.R	Thu Sep 13 03:24:24 2018 -0400
@@ -88,7 +88,7 @@
     
     res<-data.frame(I(names(in.path[which(in.path!=0)])), I(name), ratio, as.numeric(in.path[which(in.path!=0)]), as.numeric(tot.path[which(in.path!=0)]))
     res <- res[order(as.numeric(res[,3]),decreasing = TRUE),]
-    colnames(res)<-c("pathway_ID", "Description" , "Ratio IDs mapped/total IDs (%)" ,"# genes mapped in the pathway", "# total genes present in the pathway")
+    colnames(res)<-c("pathway_ID", "Description" , "Ratio IDs mapped/total IDs (%)" ,"nb genes mapped in the pathway", "nb total genes present in the pathway")
     
     return(res)