r - 如果在变量中找到向量，则从向量中分配名称

Question

如果在现有变量中找到它，我想创建一个从向量粘贴名称的变量。下面的例子。

words = c('jump','man')
test = data.frame('strings'=c('jumping','ok','manual'))

期望的输出：

test = data.frame(
'strings'=c('jumping','ok','manual'),
'want'=c('jump',NA,'man')
)

标签： rdplyr

Answer 1

我们可以用

library(stringr)
library(dplyr)
test %>% 
    mutate(want = str_extract(strings, str_c(words, collapse="|")))