Clean alert_serfling.R from remnants

CDCgov · Feb 11, 2023 · afbcb80 · afbcb80
1 parent 6f9f8c7
commit afbcb80
Showing 1 changed file with 0 additions and 6 deletions.
diff --git a/R/alert_serfling.R b/R/alert_serfling.R
@@ -227,12 +227,6 @@ alert_serfling <- function(df, t = date, y = count, baseline_end) {
   # Check for grouping variables
   grouped_df <- is.grouped_df(df)
 
-  base_tbl <- df #%>%
-  #   mutate(
-  #     {{ t }} := as.Date(!!t),
-  #     {{ y }} := as.numeric(!!y)
-  #   )
-
   if (grouped_df) {
     groups <- group_vars(df)