diff --git a/workspace/01_NHD_prep.Rmd b/workspace/01_NHD_prep.Rmd index 1f977dd5338bfe315652b9d3c2934a627d934435..fa257fcb1b5cd8910e06bd54f3da6e6ccefd887b 100644 --- a/workspace/01_NHD_prep.Rmd +++ b/workspace/01_NHD_prep.Rmd @@ -44,6 +44,8 @@ fline <- sf::st_cast(fline, "LINESTRING") catchment <- sf::read_sf(file.path(data_paths$nhdplus_dir, "reference_catchments.gpkg")) +catchment <- sf::st_transform(catchment, 5070) + # we can remove truely degenerate COMIDs # for 0 upstream area and no catchment area degen_comid <- fline[fline$TotDASqKM == 0 &