Skip to content
Snippets Groups Projects
Commit a78f4d2f authored by Blodgett, David L.'s avatar Blodgett, David L.
Browse files

layer name to match what's in sciencebase

parent ef13827b
No related branches found
No related tags found
1 merge request!53Happy path runs now
Hide whitespace changes
Inline Side-by-side
workspace/02_NHD_navigate.Rmd
+ 1
− 1
View file @ a78f4d2f
...@@ -61,7 +61,7 @@ if(needs_layer(nav_gpkg, temp_POIs)) { ...@@ -61,7 +61,7 @@ if(needs_layer(nav_gpkg, temp_POIs)) {
} }
# Join Dave's HUC12 outlets with NHD # Join Dave's HUC12 outlets with NHD
HUC12_COMIDs <- read_sf(data_paths$hu12_points_path, "hu_outlets") %>% HUC12_COMIDs <- read_sf(data_paths$hu12_points_path, "hu_points") %>%
filter(grepl(paste0("^", substr(VPU, start = 1, stop = 2)), .data$HUC12)) %>% filter(grepl(paste0("^", substr(VPU, start = 1, stop = 2)), .data$HUC12)) %>%
select(COMID, HUC12) %>% select(COMID, HUC12) %>%
switchDiv(., nhd) %>% switchDiv(., nhd) %>%
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment