R 部分字符串匹配并从匹配的行中返回一个值（如 excel 中的“匹配”）

Question

想请教一下R中的excel中是否有类似“匹配”的功能。

例如，如果我有一个包含人们教育程度的数据集：

> edu
chr [1:4] "Bachelor" "NA" "Master" "Superieur" 

ISCED 的国际地图系统：

> ISCED
 Main education program                      English translation                   Code
 Brevet d'enseignement supérieur (BES)       certificate of higher education        5
 bachelier de transition                     Bachelor                               6
 Bachelor                                    Bachelor                               6
 Master                                      Master                                 7       

我想知道是否有一个函数可以帮助识别来自数据帧 ISCED 第一列的向量 edu 中的部分字符串，然后如果匹配，将返回代码（5、6 或 7） .

我知道有像“%like%”或“grepl”这样的函数，但我正在寻找可以浏览向量 edu 的所有值的东西，而不仅仅是每次定义的一个特定字符串。

有人有什么见解吗？或者你们会建议使用带有“grepl”的循环吗？

谢谢！

Answer 1

一种方法是使用grep。

用paste0 制作一个字符串向量，并在它与第一列（Main_education_group）匹配的地方获取索引。使用该索引从数据框中获取相应的Code。

ISCED$Code[grep(paste0(edu, collapse = "|"), ISCED$Main_education_program)]

#[1] 6 7

编辑

要根据 OP 的请求获取更新的输出，我们可以使用 sapply 并循环遍历 edu 中的任何元素，并检查 Main_education_program 中是否存在该元素

sapply(edu, function(x) if(length(grep(x, ISCED$Main_education_program)) > 0) 
                         ISCED$Code[grep(x, ISCED$Main_education_program)] else NA)

返回

#  Bachelor        NA    Master  Superieur 
#        6         NA         7        NA 

如果我们需要它而不需要名称，我们可以将其包装在 unname

unname(sapply(edu, function(x) if(length(grep(x, ISCED$Main_education_program))>0) 
                  ISCED$Code[grep(x, ISCED$Main_education_program)] else NA ))

#[1]  6 NA  7 NA