创建自定义函数以删除 R 中具有特定条件的行

Question

我想创建一个可以在某些条件下删除行的自定义函数：如果我看到

col1

有两个相同的值（例如a），如

col2

所示，我打算删除包含两个

a的行

 和 

b

 值。”

下面是我所有数据名的示例：

df <- data.frame(col1 = c("a", "a", "m", "m", "m", "m"),
                 col2 = c("a", "b", "m", "x", "y", "z"))
  col1 col2
1    a    a
2    a    b
3    m    m
4    m    x
5    m    y
6    m    z

My desired outcome
  col1 col2
1    a    a
2    m    m

有什么建议吗？？？

Answer 1

您可以在 col1 上使用

group_by

 并使用 

filter

 来检查哪些值相等以保持它们如下：

library(dplyr)
df %>%
  group_by(col1) %>%
  filter(col1 == col2)
#> # A tibble: 2 × 2
#> # Groups:   col1 [2]
#>   col1  col2 
#>   <chr> <chr>
#> 1 a     a    
#> 2 m     m

创建于 2024-01-17，使用 ^{reprex v2.0.2}