# HG changeset patch # User proteore # Date 1578474221 0 # Node ID 9ac0ade20b3f3f5cda80a960da09c11eed79c006 # Parent ab697ebe0f41d07654c091780551f53ffddcab22 "planemo upload commit ba867b8fa3352695fbda1ae764407f363ee79a50-dirty" diff -r ab697ebe0f41 -r 9ac0ade20b3f kegg_maps_visualization.R --- a/kegg_maps_visualization.R Mon Jan 06 16:26:09 2020 +0000 +++ b/kegg_maps_visualization.R Wed Jan 08 09:03:41 2020 +0000 @@ -238,7 +238,7 @@ pathways_file = read_file(args$pathways_input,header2) ids <- sapply(rapply(strsplit(clean_bad_character(pathways_file[,pathway_col]),","),c), function(x) remove_kegg_prefix(x),USE.NAMES = FALSE) } - if (args$native_kegg) { ids <- ids[-grep("04215",ids)] } + if (args$native_kegg) { ids <- ids[ids != "04215"] } pathways_list <- read_file(args$pathways_list,F) if (!is.null(args$id_list)) { id_list <- get_list_from_cp(args$id_list) diff -r ab697ebe0f41 -r 9ac0ade20b3f kegg_maps_visualization.xml --- a/kegg_maps_visualization.xml Mon Jan 06 16:26:09 2020 +0000 +++ b/kegg_maps_visualization.xml Wed Jan 08 09:03:41 2020 +0000 @@ -1,4 +1,4 @@ - + of (differentially expressed) genes/proteins [KEGG] R