grepl在R中：尽管单词内有破折号，但仍存在虚假匹配

Question

下面是一个最小的可复制示例：

v=c("\\<skill-saw\\>","\\<saw blade\\>")
text="xx placed his hand beneath skill-saw blade"
sapply(v,grepl,text)

最后一条命令返回c（TRUE，TRUE），而我期望的是c（TRUE，FALSE）。 关于如何实现这一点的任何想法？ 这个想法是，应该检测到文本中存在关键字“ skill-saw”，而不是关键字“ saw blade”。

在此先感谢您的帮助！

Answer 1

您可以尝试regex

v <- c('(?<= )\\bskill-saw\\b', '(?<= )\\bsaw blade\\b')
 unname(sapply(v, grepl, text, perl=TRUE))
 #[1]  TRUE FALSE

更新

根据新的“文字”，可能是

text1 <- "xx placed his hand beneath skill saw-blade"

v <- c('(?<= )\\bskill-saw\\b', '(?<= )\\bsaw-?blade\\b')
unname(sapply(v, grepl, text1, perl=TRUE))
#[1] FALSE  TRUE