删除在一列中包含一个值而在另一列中有多个匹配项的任何数据框行

Question

假设我有这个（简化的）数据框：

C1 <- c('a','a','b','b','c','c')
C2 <- c(10,10,20,21,30,30)
C3 <- c(1.1,2.2,3.3,4.4,5.5,6.6)
df <- data.frame(C1,C2,C3)

C1	C2	C3
a	10	1.1
a	10	2.2
b	20	3.3
b	21	4.4
c	30	5.5
c	30	6.6

我想做的是删除任何包含 C1 值且在 C2 列中有多个匹配项的行。在这种情况下，我想删除 C1 列中包含 'b' 的整个行（因为 'b' 在 C2 列中有两个匹配项 - 20 和 21）。

这应该是这个 df 的结果：

C1	C2	C3
a	10	1.1
a	10	2.2
c	30	5.5
c	30	6.6

任何帮助将不胜感激！

谢谢，

尤瓦尔

Answer 1

子集是一种方法：

C1 <- c('a','a','b','b','c','c')
C2 <- c(10,10,20,21,30,30)
C3 <- c(1.1,2.2,3.3,4.4,5.5,6.6)
df <- data.frame(C1,C2,C3)

df_table <- table(df$C2)
df_subset <- subset(df, C2 %in% names(df.table[df.table > 1]))
df_subset

Answer 2

dplyr 是另一种方法。使用 group_by 分别处理每个 C1 组，然后 filter 每个组，仅保留具有单个值 C2

的组

library(dplyr)

C1 <- c('a','a','b','b','c','c')
C2 <- c(10,10,20,21,30,30)
C3 <- c(1.1,2.2,3.3,4.4,5.5,6.6)
df <- data.frame(C1,C2,C3)

df <- df %>%
    group_by(C1) %>%
    filter(length(unique(C2)) == 1) %>%
    ungroup()

print(df)

输出

# A tibble: 4 x 3
  C1       C2    C3
  <chr> <dbl> <dbl>
1 a        10   1.1
2 a        10   2.2
3 c        30   5.5
4 c        30   6.6

删除在一列中包含一个值而在另一列中有多个匹配项的任何数据框行

Remove any data frame rows containing a value in one column which has multiple matches in another column

r

matching

dataframe

row-removal