matched node.sum config with cp_enrichment.R

common/plot_kegg_pathways.R

@@ -78,6 +78,7 @@ plot_pathway <- function(pathwayID, sliceData){
     multi.state = ncol(sliceData)>1,
     #            kegg.native=F,
     #            node.sum = "mean", # the method name to calculate node summary given that multiple genes or compounds are mapped to it
+    node.sum = "max.abs", # the method name to calculate node summary given that multiple genes or compounds are mapped to it
     limit = list(gene = c(-4,4)),
     gene.idtype="ensembl"
     )