查找重复行(使用dplyr)

时间:2017-12-20 09:32:58

标签: r duplicates dplyr

我有以下数据框:

> df1 <- data.frame("valA" = c(1,1,1,1,2,1,3,3,3), "valB" = c(1,2,3,1,2,3,1,2,3), "Score" = c(100,90,80,100, 60,80,10,20,30))
> df1
  valA valB Score
1    1    1   100
2    1    2    90
3    1    3    80
4    1    1   100
5    2    2    60
6    1    3    80
7    3    1    10
8    3    2    20
9    3    3    30

我想要重复的值(预期的结果是):

     valA  valB Score
 1     1     1   100
 2     1     3    80
 3     1     1   100
 4     1     3    80

我知道有一些代码可以在dplyr :: distinct中获取唯一值,但我需要知道哪些行是重复的,而不是从数据框中删除重复。我尝试了R base包:重复功能,但由于我的数据很大(超过2000万行),因此速度太慢。我也尝试过:

duplicated_df1 <- df1 %>% group_by(valA, valB, Score) %>% filter(n() > 1)

可以导致上面的预期结果,但同样,它太慢了,我没有足够的RAM。 任何人都可以建议我找到重复行的有效和快速的方法吗?

1 个答案:

答案 0 :(得分:0)

对于大数据,尝试data.table approch通常很有用。在这种情况下,您可以使用以下方法找到重复的行:

library(data.table)
setDT(df1, key = c("valA", "valB", "Score"))
df1[, N := .N, by = key(df1)]                # count rows per group
df1[N > 1]