From e4b68c568e48515eb23f3c60ab34e353214c00a5 Mon Sep 17 00:00:00 2001
From: Bock <abock@usgs.gov>
Date: Wed, 8 Apr 2020 19:40:35 -0600
Subject: [PATCH] Removed one paste0 for file location
---
workspace/NHD_navigate.Rmd | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/workspace/NHD_navigate.Rmd b/workspace/NHD_navigate.Rmd
index f9415a0..7df992d 100644
--- a/workspace/NHD_navigate.Rmd
+++ b/workspace/NHD_navigate.Rmd
@@ -139,7 +139,7 @@ if(needs_layer(out_gpkg, TE_pois)) {
if(needs_layer(out_gpkg, NID_pois)) {
# Read in Thermoelectric shapefile
- NID_fac <- read.csv(paste0(data_paths$NID_points_path, "/NID_attributes_20170612.txt")) %>%
+ NID_fac <- read.csv(file.path(data_paths$NID_points_path, "/NID_attributes_20170612.txt")) %>%
filter(ONNHDPLUS == 1, grepl(paste0("^", hydReg, ".*"), .data$VPU)) %>%
switchDiv(., nhd)
--
GitLab