根据向量中的值过滤数据框行

Question

当要删除的值存储在向量中时，从数据框中过滤行的最佳方法是什么？就我而言，我有一个包含日期的列，并且想要删除几个日期。

我知道如何使用 != 删除与 one 天相对应的行，例如：

m[m$date != "01/31/11", ]

要删除向量中指定的多个日期，我尝试过：

m[m$date != c("01/31/11", "01/30/11"), ]

但是，这会生成警告消息：

Warning message:
In `!=.default`(m$date, c("01/31/11", "01/30/11")) :
longer object length is not a multiple of shorter object length
Calls: [ ... [.data.frame -> Ops.dates -> NextMethod -> Ops.times -> NextMethod

应用基于多个值的过滤器的正确方法是什么？

Answer 1

nzcoops 的建议很正确。我不久前在 R Chat 中提出了这个问题，Paul Teetor 建议定义一个新函数：

`%notin%` <- function(x,y) !(x %in% y) 

然后可以按如下方式使用它：

foo <- letters[1:6]

> foo[foo %notin% c("a", "c", "e")]
[1] "b" "d" "f"

不用说，这个小宝石现在在我的 R 个人资料并且经常使用。

Answer 2

我想为此你想要：

m[!m$date %in% c("01/31/11","01/30/11"),]

Answer 3

很酷的方法是使用 Negate 函数来创建新的：

`%ni%` <- Negate(`%in%`) 

然后您可以使用它来查找不相交的元素

Answer 4

针对上面的一些问题，这里有一个符合 tidyverse 的解决方案。我使用 dplyr 中的 anti_join 来达到相同的效果：

library(tidyverse)

numbers <- tibble(numbers = c(1:10))
numbers_to_remove <- tibble(number = c(3, 4, 5))

numbers %>%
  anti_join(numbers_to_remove)