基于R的另一列中的数据框中的逐步列总和

Question

框

我	数据
这样	的
有	​
​	​
​	​
​	​
​	​

​

​	​	​
​	​	​
​	​	​
​	​	​
​	3	2.5
b	1	5
b	6	3

平均（x）是X的所有以前实例的平均值，而团队相同。我有以下R码获得总体平均值，但是我正在寻找“逐步”平均值。

    new_df <- df %>% group_by(Team) %>% summarise(avg_x = mean(x))

有没有办法对此进行矢量化，同时仅评估每个“迭代”上的先前行？

Answer 1

您需要Cummean（）函数从dplyr，与lag（）：

df %>% group_by(Team) %>% mutate(avg_x = replace_na(lag(cummean(x)), 0))

生成以下内容：

# A tibble: 6 × 3
# Groups:   Team [2]
  Team      x avg_x
  <chr> <dbl> <dbl>
1 A         3   0
2 B         5   0
3 A         2   3
4 A         3   2.5
5 B         1   5
6 B         6   3

根据需要。

编辑1：

AS @ritchie sacramento 指出，以下内容更加清晰，更清晰：

df %>% group_by(Team) %>% mutate(avg_x = lag(cummean(x), default = 0))