comparison kegg_maps_visualization.R @ 11:7d04efde2526 draft

"planemo upload commit 1f9a98db2496834cc38a281cbe3d4b11de2bc3d2-dirty"
author proteore
date Thu, 05 Mar 2020 13:45:08 +0000
parents a4db9efe1e43
children 10c572ad2b9e
comparison
equal deleted inserted replaced
10:a4db9efe1e43 11:7d04efde2526
170 } 170 }
171 return(res) 171 return(res)
172 } 172 }
173 173
174 get_limit <- function(mat) { 174 get_limit <- function(mat) {
175 min = min(apply(mat,2,min)) 175 min = min(apply(mat,2,min,na.rm=TRUE))
176 max = max(apply(mat,2,max)) 176 max = max(apply(mat,2,max,na.rm=TRUE))
177 return(c(min,max)) 177 return(c(min,max))
178 } 178 }
179 179
180 check_pathway_ids<- function(pathways_ids) { 180 check_pathway_ids<- function(pathways_ids) {
181 problematic_pathways <- c("04215","04723") 181 problematic_pathways <- c("04215","04723")