删除特定组合的重复项

Question

我需要从我的数据框中删除一些重复的记录。但只是特定组合的重复。

例如，在此示例中，Id|Status 我想删除状态为“B”的重复项。也就是说，状态 'A' 可以出现多次，但状态 'B' 每个 'Id' 只能出现一次

1 A
1 A
1 A
1 A
2 A
2 A
1 B
2 B
2 B

结果应该是:

1 A
1 A
1 A
2 A
2 A
1 B
2 B

哪种方法最好？

测试数据:

 test <- data.frame(id=c(1,1,1,1,2,2,1,2,2))
 test$status <- c("A","A","A","A","A","B","B", "B")

Answer 1

这可能会如您所愿。如果您测试相等性，当第二列值为 NA 时，您可能会遇到问题。 x == "B" 将为 NA，然后结果中将有一个 NA 行。

test <- read.table(text="1 A
 1 A
 1 A
 1 A
 2 A
 2 A
 1 B
 2 B
 2 B")
 test[ !( duplicated(test) & ( test[[2]] %in% "B")) , ]
#-------    
  V1 V2
1  1  A
2  1  A
3  1  A
4  1  A
5  2  A
6  2  A
7  1  B
8  2  B