Addedlines to create data/bin folders if they don't exist

workspace/get_data.Rmd

@@ -19,6 +19,9 @@ library(tidyr)
 library(dplyr)
 library(sf)
 
+
+if(!dir.exists("data")) {dir.create("data")}
+if(!dir.exists("bin")) {dir.create("bin")}
 data_dir <- "data"
 out_list <- list("data_dir" = data_dir)
 out_file <- file.path("cache", "data_paths.json")