From 19dc2ced21dda961431f32777abab655d2205763 Mon Sep 17 00:00:00 2001
From: David Blodgett <dblodgett@usgs.gov>
Date: Sat, 29 Jul 2023 20:18:45 -0500
Subject: [PATCH] fixes #129

---
 workspace/01_Gage_Selection.Rmd | 2 +-
 workspace/runners/run_one_R.R   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/workspace/01_Gage_Selection.Rmd b/workspace/01_Gage_Selection.Rmd
index 5b9827f..8a9a6ec 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 426f025..1bfba3d 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"))
 
-- 
GitLab