6

この問題を説明する簡単な例を次に示します。

library(data.table)
dt = data.table(a = c(1,1,2,2), b = 1:2)

dt[, c := cumsum(a), by = b][, d := cumsum(a), by = c]
#   a b c d
#1: 1 1 1 1
#2: 1 2 1 2
#3: 2 1 3 2
#4: 2 2 3 4

最初は永続的であり、グループ化は と の両方によるため、 Iで同じことをしようとするdplyrと失敗します:group_bybc

df = data.frame(a = c(1,1,2,2), b = 1:2)

df %.% group_by(b) %.% mutate(c = cumsum(a)) %.%
       group_by(c) %.% mutate(d = cumsum(a))
#  a b c d
#1 1 1 1 1
#2 1 2 1 1
#3 2 1 3 2
#4 2 2 3 2

これはバグですか、それとも機能ですか? それが機能である場合data.table、単一のステートメントでソリューションをどのように複製しますか?

4

1 に答える 1

7

これを試して:

> df %>% group_by(b) %>% mutate(c = cumsum(a)) %>%
+        group_by(c) %>% mutate(d = cumsum(a))
Source: local data frame [4 x 4]
Groups: c

  a b c d
1 1 1 1 1
2 1 2 1 2
3 2 1 3 2
4 2 2 3 4

アップデート

dplyr の新しいバージョンで%>%は、%.%andungroupは不要になりました (David Arenburg のコメントによると)。

于 2014-02-12T18:56:18.847 に答える