vs_am_rules <- . %>%
dplyr::group_by(vs, am) %>%
dplyr::summarise(
nrow_low = n(.) > 10,
nrow_up = n(.) < 20,
rowmeans_low = rowMeans(.) > 19
)
group_packs(vs_am = vs_am_rules, .group_vars = c("vs", "am"))
Run the code above in your browser using DataLab