使用str_extract与perl提取子字符串

Question

我尝试将perl与stringr结合使用以获取两个单词之间的字符，但给出的示例不起作用并给出以下错误消息：

x = "PRODUCT colgate good but not good OKAY"
library(stringr)
str_extract(string = x, pattern = perl("(?<=PRODUCT).*(?=OKAY)"))

  

perl（“（？<= PRODUCT）。*（？= OKAY）”）错误：找不到函数“ perl”

我期望结果是： “高露洁好，但不好”

Answer 1

我们不需要任何perl包装（使用stringr版本-‘1.4.0’）

library(stringr)
str_extract(string = x, pattern = "(?<=PRODUCT ).*(?= OKAY)")
#[1] "colgate good but not good"