Fix partial rename: aggregate_epi_df -> sum_groups_epi_df in messages

Author: brookslogan

R/slide.R

@@ -195,7 +195,7 @@ epi_slide <- function(
       cli_abort(
         "`.x` must be either grouped by {expected_group_keys} or ungrouped; if the latter,
          we'll temporarily group by {expected_group_keys} for this operation. You may need
-        to aggregate your data first, see aggregate_epi_df().",
+        to aggregate your data first; see sum_groups_epi_df().",
         class = "epiprocess__epi_slide__invalid_grouping"
       )
     }
@@ -701,7 +701,7 @@ epi_slide_opt <- function(
       cli_abort(
         "`.x` must be either grouped by {expected_group_keys} or ungrouped; if the latter,
          we'll temporarily group by {expected_group_keys} for this operation. You may need
-        to aggregate your data first, see aggregate_epi_df().",
+        to aggregate your data first; see sum_groups_epi_df().",
         class = "epiprocess__epi_slide_opt__invalid_grouping"
       )
     }