drop now unused variables

DOI-USGS · Dec 6, 2022 · 8545ef3 · 8545ef3
1 parent 6270404
commit 8545ef3
Showing 1 changed file with 1 addition and 5 deletions.
diff --git a/2_process/src/compare_to_historic.R b/2_process/src/compare_to_historic.R
@@ -21,11 +21,7 @@ compare_to_historic <- function(target_name, historic_quantile_fn, current_data_
 
     if(nrow(site_quantiles) == 0) {
       message(sprintf("Quantiles not available for %s, returning NA.", site))
-    } 
-
-    # Pull historic maximum and minimum values for site
-    min_hist_va <- min(site_quantiles$quantile_va)
-    max_hist_va <- max(site_quantiles$quantile_va)
+    }
 
     # Get percentiles for current values based on historical record
     site_current <- current_data %>%