From 156c7282fe8004e9fdbd05b233747050c7f5b8df Mon Sep 17 00:00:00 2001 From: dsweber2 Date: Thu, 7 Nov 2024 17:23:17 -0600 Subject: [PATCH] patch drop_ignored_keys broken grouped behavior --- R/utils-latency.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/utils-latency.R b/R/utils-latency.R index 8bcd2b1e..25799f22 100644 --- a/R/utils-latency.R +++ b/R/utils-latency.R @@ -358,7 +358,7 @@ get_latency_table <- function(training, columns, forecast_date, latency, drop_ignored_keys <- function(training, keys_to_ignore) { # note that the extra parenthesis black magic is described here: https://github.com/tidyverse/dplyr/issues/6194 # and is needed to bypass an incomplete port of `across` functions to `if_any` - training %>% + training %>% ungroup %>% filter((dplyr::if_all( names(keys_to_ignore), ~ . %nin% keys_to_ignore[[cur_column()]]