r - 否定匹配

Question

这真的很简单，但是我似乎找不到它。我知道R的否定版本%in%返回“not in”。显然，我可以只使用!(x %in% y)，但是该语言包括一个已经被否定的结构，我想使用它，goshdarnit。

那么功能是什么呢？搜索以及%nin%和%notin%均失败。

如果您使用以下示例数据将答案与!(x %in% y)进行基准比较，则可以为您提供奖励互联网:

x <- sample( sample(letters,5), 10^3, replace=TRUE)
y <- sample( letters, 10^5, replace=TRUE)

Answer 1

只是出于兴趣。定义

"%w/o%" <- function(x, y) x[!x %in% y] 
'%ni%' <- Negate('%in%')

> benchmark(y[y%ni%x], y%w/o%x,replications=1000)
         test replications elapsed relative user.self sys.self user.child
2   y %w/o% x         1000    5.32 1.000000      4.60     0.70         NA
1 y[y %ni% x]         1000    5.34 1.003759      4.68     0.65         NA
  sys.child
2        NA
1        NA

我会得到一个 cookies 吗？