not in 的 pipeline 定义

参考 RStudio Community 学习了purrr::negate的一个用法。可以定义%!in% ，方便平时使用。

library(purrr)
`%!in%` <- negate(`%in%`)
3 %!in% c(1,2,3)

## [1] FALSE

3 %in% c(1,2,3)

## [1] TRUE

3 %!in% c(1,2,4)

## [1] TRUE

3 %in% c(1,2,4)

## [1] FALSE