我有这样的df:
Num <- c(1,1,1,2,2,3,4,5)
ID <- c("A","B","C","A","B","C","D","E")
dff <- data.frame(Num,ID)
我正在尝试删除任何具有重复条目的行。我是这样做的
dff1 <- dff[!duplicated(dff[,1]),]
我得到了输出
Num ID
1 1 A
4 2 A
6 3 C
7 4 D
8 5 E
但是我想要的输出是
Num ID
6 3 C
7 4 D
8 5 E
我在这里缺少什么?
答案 0 :(得分:2)
你可以尝试:
dff[dff$Num %in% as.numeric(names(table(dff$Num)==1)[table(dff$Num)==1]),]
Num ID
6 3 C
7 4 D
8 5 E
或使用dplyr
library(dplyr)
dff %>% group_by(Num) %>% filter(n()==1)
Source: local data frame [3 x 2]
Groups: Num
Num ID
1 3 C
2 4 D
3 5 E