diff --git a/workspace/01_Gage_Selection.Rmd b/workspace/01_Gage_Selection.Rmd index 5b9827fd9981a54ca9939fd9b71a7f989774fbfa..8a9a6ecc6c84c10d8129b9b466c295ab4fb0e7f9 100644 --- a/workspace/01_Gage_Selection.Rmd +++ b/workspace/01_Gage_Selection.Rmd @@ -66,7 +66,7 @@ if(!file.exists("data/ref_gages.gpkg")){ ```{r GAGESIII-SWIM} # Read gagesIII dbf that is a POR summary produced from 00_gage_info.Rmd -gagesIII_db_full <- read.dbf(file = file.path(data_paths$data_dir, "gages3GFinfo.dbf"), as.is = TRUE) %>% +gagesIII_db_full <- read.dbf(file = file.path(data_paths$data_dir, "SWIMGFinfo.dbf"), as.is = TRUE) %>% rename(total_obs = count_nu, total_poss_obs = TPdays1) # Read in shapefile diff --git a/workspace/runners/run_one_R.R b/workspace/runners/run_one_R.R index 426f025de570565366a89e453af976913d351f76..1bfba3df1181372a8435a63302e7b86c6dc987e7 100644 --- a/workspace/runners/run_one_R.R +++ b/workspace/runners/run_one_R.R @@ -4,7 +4,7 @@ possible_vpu <- c("01", "08", "10L", "15", "02", "04", "05", "06", "13", "14", "16", "17", "18") -vpu_codes <- VPU <- "10L" +vpu_codes <- VPU <- vpu <- "01" check_file <- file.path("temp/", paste0(VPU, ".lock"))