r - 对每个唯一组合 r 的列内的行求和

Question

我想为其他两列的每个唯一组合对给定列中的值求和:

例如，我想转换以下数据框:

Week  Day  Value
1     1    1
1     2    3
1     3    4
2     1    2
2     2    2
2     3    3

到:

Week  Day  Value Sum
1     1    1     1
1     2    3     4
1     3    4     8
2     1    2     2
2     2    2     4
2     3    3     7

我认为 for 循环会做我想做的事 - 但我现在完全迷失了 - 任何和所有的帮助都很感激...

Answer 1

在基础 R 中，您可以使用 ave():

x <- read.table(header=T, text="
Week  Day  Value
1     1    1
1     2    3
1     3    4
2     1    2
2     2    2
2     3    3
")
x$Sum <- ave(x$Value, x$Week, FUN=cumsum)

> x
  Week Day Value Sum
1    1   1     1   1
2    1   2     3   4
3    1   3     4   8
4    2   1     2   2
5    2   2     2   4
6    2   3     3   7