Skip to content
Snippets Groups Projects
Commit 8609973c authored by Hofstra, Nynke's avatar Hofstra, Nynke
Browse files

Minor change, removed log 10 calculation, that is now done in plotter for level 4 exception

parent db3aaf94
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 1 addition and 3 deletions
api.R
+ 1
− 3
View file @ 8609973c
...@@ -89,9 +89,7 @@ function(human_data,isoraster,popurban,poprural,wwtp,level,wkt_extent,pathogen_t ...@@ -89,9 +89,7 @@ function(human_data,isoraster,popurban,poprural,wwtp,level,wkt_extent,pathogen_t
if(level != 4){ if(level != 4){
glowpa_output$grid$pathogen_water <- log10(glowpa_output$grid$pathogen_water) glowpa_output$grid$pathogen_water <- log10(glowpa_output$grid$pathogen_water)
writeRaster(glowpa_output$grid$pathogen_water,filename = glowpa_output$files$pathogen_water_grid, overwrite=T) writeRaster(glowpa_output$grid$pathogen_water,filename = glowpa_output$files$pathogen_water_grid, overwrite=T)
} else { }
glowpa_output$emissions<-log10(glowpa_output$emissions)
}
brks<-c(-1,0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,Inf) brks<-c(-1,0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,Inf)
cols <- plotter.get.colors.khroma("discrete rainbow",18) cols <- plotter.get.colors.khroma("discrete rainbow",18)
boundaries_plot <- borders boundaries_plot <- borders
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment