Skip to content

Commit

Permalink
[skip style] [skip vbump] Restyle files
Browse files Browse the repository at this point in the history
  • Loading branch information
github-actions[bot] committed Oct 14, 2024
1 parent 7b7bf6b commit d84b4ff
Showing 1 changed file with 12 additions and 12 deletions.
24 changes: 12 additions & 12 deletions R/Data-methods.R
Original file line number Diff line number Diff line change
Expand Up @@ -1002,18 +1002,18 @@ setMethod(
values_fill = 0
)
if (nrow(y) > 0) {
y <- y %>%
dplyr::mutate(
dplyr::across(tidyselect::matches("Cat\\d+"), \(x) x > 0)
) %>%
dplyr::rowwise() %>%
dplyr::mutate(
AnyTox = any(dplyr::across(c(tidyselect::starts_with("Cat"), -Cat0), any)),
# Direct assignment fails on GitHub
Cat0 = !AnyTox
) %>%
dplyr::select(-AnyTox) %>%
dplyr::ungroup()
y <- y %>%
dplyr::mutate(
dplyr::across(tidyselect::matches("Cat\\d+"), \(x) x > 0)
) %>%
dplyr::rowwise() %>%
dplyr::mutate(
AnyTox = any(dplyr::across(c(tidyselect::starts_with("Cat"), -Cat0), any)),
# Direct assignment fails on GitHub
Cat0 = !AnyTox
) %>%
dplyr::select(-AnyTox) %>%
dplyr::ungroup()
}
y <- y %>% h_tidy_class(x)
y
Expand Down

0 comments on commit d84b4ff

Please sign in to comment.