r - 使用 dplyr 计算与组均值的差异

Question

我想计算每一行与其组的平均值之间的差异。有没有办法在不创建中间表并加入它的情况下做到这一点？

group_summary <- mtcars %>%
  group_by(cyl) %>%
  summarize(mean_mpg = mean(mpg))

left_join(mtcars, group_summary) %>%
  mutate(mpg_diff_from_group = mpg - mean_mpg)

Answer 1

是的，下面的工作没有中间表:

mtcars %>%
    group_by(cyl) %>%
    mutate(grouped_diff = mpg - mean(mpg)) %>%
    ungroup()