web-dev-qa-db-ja.com

dplyrを使用してRデータフレームに累積列を追加する方法は?

this post と同じ質問がありますが、dplyrを使用します:

Rデータフレームの場合、たとえば:

df <- data.frame(id = rep(1:3, each = 5)
                 , hour = rep(1:5, 3)
                 , value = sample(1:15))

idと一致する累積合計列を追加するにはどうすればよいですか?

dplyrがなければ、以前の投稿で受け入れられている解決策は次のとおりです。

df$csum <- ave(df$value, df$id, FUN=cumsum)
38
Racing Tadpole

このような?

df <- data.frame(id = rep(1:3, each = 5),
                 hour = rep(1:5, 3),
                 value = sample(1:15))

mutate(group_by(df,id), cumsum=cumsum(value))

または、dplyrのパイピング演算子を使用する場合:

df %>% group_by(id) %>% mutate(cumsum = cumsum(value))

両方の場合の結果:

Source: local data frame [15 x 4]
Groups: id

   id hour value cumsum
1   1    1     4      4
2   1    2    14     18
3   1    3     8     26
4   1    4     2     28
5   1    5     3     31
6   2    1    10     10
7   2    2     7     17
8   2    3     5     22
9   2    4    12     34
10  2    5     9     43
11  3    1     6      6
12  3    2    15     21
13  3    3     1     22
14  3    4    13     35
15  3    5    11     46
65