我有一个数据表,当使用汇总功能和group_by时,我会得到重复的行。
我将给我的问题一个简化的例子。首先,我使用group_by和mutate为每个id添加“值”的总和。
dt <- data.table(id = rep(1:5, each=10), cpc = rep((0.1*seq(5)), each=2), value = 1:50)
dt2 <- dt %>%
group_by(id) %>%
mutate(SumValue = sum(value))
Source: local data table [50 x 4]
id cpc value SumValue
1 1 0.1 1 55
2 1 0.1 2 55
3 1 0.2 3 55
4 1 0.2 4 55
5 1 0.3 5 55
6 1 0.3 6 55
7 1 0.4 7 55
8 1 0.4 8 55
9 1 0.5 9 55
10 1 0.5 10 55
.. .. ... ... ...
到目前为止,没有什么问题。但是在那之后,当我为每个idgroup_by时,cpc组合和使用总结,输出并不像我预期的那样。数字是正确的,但是有重复的行。
dt2 %>%
group_by(id, cpc) %>%
summarise(count = n(), SumValue = SumValue)
Source: local data table [50 x 4]
Groups: id
id cpc count SumValue
1 1 0.1 2 55
2 1 0.1 2 55
3 1 0.2 2 55
4 1 0.2 2 55
5 1 0.3 2 55
6 1 0.3 2 55
7 1 0.4 2 55
8 1 0.4 2 55
9 1 0.5 2 55
10 1 0.5 2 55
.. .. ... ... ...
使用唯一()给出了所需的结果,但我认为这不是必要的。
dt2 %>%
group_by(id, cpc) %>%
summarise(count = n(), SumValue = SumValue) %>%
unique()
Source: local data table [25 x 4]
Groups: id
id cpc count SumValue
1 1 0.1 2 55
2 1 0.2 2 55
3 1 0.3 2 55
4 1 0.4 2 55
5 1 0.5 2 55
6 2 0.1 2 155
7 2 0.2 2 155
8 2 0.3 2 155
9 2 0.4 2 155
10 2 0.5 2 155
.. .. ... ... ...
我以为group_by在add=FALSE时设置group,所以我不知道为什么会出现重复的行。
我不确定确切的问题,但是当您将向量分配给汇总变量时,您通常需要选择向量的一个元素。所以在这种情况下,您需要选择将“SumValue”的哪个值分配给汇总的“SumValue”。我通常只对变量[1]执行此操作,但首先(变量)可能会更好。这会给你想要的结果吗?
dt <- data_frame(id = rep(1:5, each=10),
cpc = rep((0.1*seq(5)), each=10),
value = 1:50)
dt2 <- dt %>%
group_by(id) %>%
mutate(SumValue = sum(value))
dt2
dt2 %>%
group_by(id, cpc) %>%
summarise(count = n(), SumValue = first(SumValue))
尝试以这种方式使用唯一。不确定这是否有帮助。
R> df <- data.frame(a=c(1,2,3,4,3,2), b=c(4,5,6,6,4,3))
R> unique(unlist(df))
[1] 1 2 3 4 5 6