ExecKeywords <- c('cio','cto','cco','coo','ciso','cso','cdo','cdio',
'Chief Information','CIO','Chief Technology Officer','Chief Compliance Officer','Chief Security')
Titles <- c('Director - Customer Success','CIO','Director Cloud Operations',
'Director of Information Technology and Chief Information Security Officer',
'Director, Information Services','Director, Global Information Technology',
'Chief Technology Officer','Sr. Director','COO / CTO Advice Company',
'Director of Information Technology','Director of Technology',
'Vice President, Platform Operations and Information Technology',
'Accounting Manager','VP, Strategy and Programs','IT Director','CTO',
'Director of Network Services','Director','Director, Application Engineering',
'Deputy Director of Technology')
grep(paste(ExecKeywords, collapse = "|"), Titles, value = T)
我正在尝试识别与ExecKeywords中找到的多个模式中的一个匹配的标题。在ExecKeywords的每个元素之后、管道之前和管道之后(在折叠中)放置一个空格似乎都做了一些不同的事情,但并不是我想要的。所有的帖子都引用了粘贴和折叠方法,但这似乎对me...am不起作用,我错过了什么吗?ignore.case似乎也没有像预期的那样工作
应该期待像这样的回报
'CIO','Director of Information Technology and Chief Information Security Officer','Chief Technology Officer','COO / CTO Advice Company','CTO'
发布于 2020-02-05 11:19:59
一种选择是也有一个单词边界paste
d,以避免在单词中匹配子字符串
grep(paste0("\\b(", paste(ExecKeywords, collapse = "|"), ")\\b"),
Titles, value = TRUE, ignore.case = TRUE)
#[1] "CIO"
#[2] "Director of Information Technology and Chief Information Security Officer"
#[3] "Chief Technology Officer"
#[4] "COO / CTO Advice Company"
#[5] "CTO"
https://stackoverflow.com/questions/60068548
复制相似问题