patch fix to add_proportion()

joshualerickson · May 18, 2023 · e8ddae6 · e8ddae6
1 parent 6e418be
commit e8ddae6
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/utils.R b/R/utils.R
@@ -89,7 +89,8 @@ add_proportion <- function(data) {
     dplyr::group_by(data, site_no, wy) %>%
     dplyr::mutate(dplyr::across(dplyr::any_of(cols),
                                 list(max_prop = ~.x/max(.x, na.rm = TRUE)
-                                )))
+                                ))) %>%
+    dplyr::ungroup()
 }
 
 #' water year to months