if_any.()/if_all.() try to use the .by columns when .cols = everything()

[markfairbanks]

pacman::p_load(tidytable)

test_df <- tidytable(
  group = c("a", "a", "b"),
  val1 = 1:3,
  val2 = 1:3
)

test_df %>%
  filter.(if_any.(everything(), ~ .x <= mean(.x)), .by = group)
#> Warning in mean.default(group): argument is not numeric or logical: returning NA

#> Warning in mean.default(group): argument is not numeric or logical: returning NA
#> # A tidytable: 2 × 3
#>   group  val1  val2
#>   <chr> <int> <int>
#> 1 a         1     1
#> 2 b         3     3

[moutikabdessabour]

maybe pass the by columns to prep_expr??

[markfairbanks]

Hmm yep - I think that makes sense