r - 子字符串+在关键字周围获取单词

如果我有一个字符串:

moon <- "The cow jumped over the moon with a silver plate in its mouth"

有没有办法我可以提取"moon"附近的单词。 “moon”周围的邻居可能是2或3个字。

所以如果我的

"The cow jumped over the moon with a silver plate in its mouth"

我只希望输出为:

"jumped over the moon with a silver"

我知道如果要按字符提取，可以使用str_locate，但不确定如何使用“单词”来提取。可以在R中完成吗？

感谢和问候，
西马克

最佳答案

使用strsplit:

x <- strsplit(str, " ")[[1]]
i <- which(x == "moon")
paste(x[seq(max(1, (i-2)), min((i+2), length(x)))], collapse= " ")

关于r - 子字符串+在关键字周围获取单词，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/17983359/