diff --git a/workspace/R/NHD_navigate.R b/workspace/R/NHD_navigate.R index 746d2134f731689d08093575396b2addd957142d..9ff7e7ca3f06f57bef38eabe19911667398bbe95 100644 --- a/workspace/R/NHD_navigate.R +++ b/workspace/R/NHD_navigate.R @@ -632,7 +632,7 @@ split_elev <- function(in_POI_ID, split_DF, elev_diff, max_DA){ first_iter <- unique(split_elev_DF$iter) # Iterate through segs that need splitting - for (i in c(first_iter:max(split_DF$iter, na.rm = T))){ + for (i in c(first_iter:(max(split_DF$iter, na.rm = T) + 10))){ #print(i) # first split