edit top threat by basin map names

findex/_targets.R

@@ -250,11 +250,11 @@ p3 <- list(
         theme(legend.position = "none")
       
       # change to actual directory once design is finalized --------------------
-      ggsave(sprintf("../src/assets/images/%s_threat_by_basin.png", p2_threat_categories), 
+      ggsave(sprintf("../src/assets/images/%s_threat_by_basin.png", str_replace_all(p2_threat_categories, " ", "_")), 
              final_plot, height = 6, width = 10, dpi = 300)
       
       # change to actual directory once design is finalized --------------------
-      knitr::plot_crop(sprintf("../src/assets/images/%s_threat_by_basin.png", p2_threat_categories))
+      knitr::plot_crop(sprintf("../src/assets/images/%s_threat_by_basin.png", str_replace_all(p2_threat_categories, " ", "_")))
     },
     format = "file",
     pattern = p2_threat_categories