测试向量是否包含给定元素

（返回第一个外观）和（返回布尔值）函数都是为此而设计的。match()%in%

v <- c('a','b','c','e')

'b' %in% v
## returns TRUE

match('b',v)
## returns the first location of 'b', in this case: 2

您可以使用运算符：%in%

vec <- c(1, 2, 3, 4, 5)
1 %in% vec # true
10 %in% vec # false

any（） 函数使代码可读

> w <- c(1,2,3)
> any(w==1)
[1] TRUE

> v <- c('a','b','c')
> any(v=='b')
[1] TRUE

> any(v=='f')
[1] FALSE

还要找到元素“which”的位置，可以用作

pop <- c(3, 4, 5, 7, 13)

which(pop==13)

要找到目标向量中未包含的元素，可以这样做：

pop <- c(1, 2, 4, 6, 10)

Tset <- c(2, 10, 7)   # Target set

pop[which(!(pop%in%Tset))]

is.element()使代码更具可读性，并且与%in%

v <- c('a','b','c','e')

is.element('b', v)
'b' %in% v
## both return TRUE

is.element('f', v)
'f' %in% v
## both return FALSE

subv <- c('a', 'f')
subv %in% v
## returns a vector TRUE FALSE
is.element(subv, v)
## returns a vector TRUE FALSE

为此，我真的很喜欢 grep（） 和 grepl（）。

grep（） 返回一个整数向量，指示匹配项的位置。

yo <- c("a", "a", "b", "b", "c", "c")

grep("b", yo)
[1] 3 4

grepl（） 返回一个逻辑向量，匹配位置为“TRUE”。

yo <- c("a", "a", "b", "b", "c", "c")

grepl("b", yo)
[1] FALSE FALSE  TRUE  TRUE FALSE FALSE

这些函数区分大小写。

我将根据输出对选项进行分组。假设所有示例都采用以下向量。

v <- c('z', 'a','b','a','e')

要检查存在：

%英寸%

> 'a' %in% v
[1] TRUE

任意（）

> any('a'==v)
[1] TRUE

is.element（）

> is.element('a', v)
[1] TRUE

对于查找首次出现的情况：

匹配（）

> match('a', v)
[1] 2

要查找所有出现项作为索引向量：

其中（）

> which('a' == v)
[1] 2 4

要查找所有出现的情况作为逻辑向量：

==

> 'a' == v
[1] FALSE  TRUE FALSE  TRUE FALSE

编辑： 由于注释中提到的原因，从列表中删除 grep（） 和 grepl（）

检查向量中是否存在元素的另一种选择是使用包中的语法，如下所示：%in{}%inops

library(inops)
#> 
#> Attaching package: 'inops'
#> The following object is masked from 'package:base':
#> 
#>     <<-
v <- c('a','b','c','e')
v %in{}% c("b")
#> [1] FALSE  TRUE FALSE FALSE

^{创建于 2022-07-16 由 reprex 软件包 （v2.0.1）}