r - 拆分有 2 个相似词的句子

Question

我需要在一个句子中拆分单词，但这里有一些问题

word.list1 <- c("rose","location","criminal","lotus","check","sing","single")

如果你看上面的代码，sing 和 single 是我列表中的 2 个词

现在我有一句话

a <- "rosesinglelocationcriminalcheck"

以下代码将拆分单词

for (word in word.list) {
  a <- gsub(word, paste0(word, " "), a)     }

> a1

[1] "rose sing le location criminal check "
其实我需要像下面这样的输出

> a1

[1] "rose single location criminal check "
因为我的列表中有唱歌和单例。代码实际上正在唱歌。有没有地方可以拆分单词

Answer 1

对于这种特殊情况，只需在 gsub 中切换空格即可:

word.list <- c("rose","location","criminal","lotus","check","sing","single")

a <- "rosesinglelocationcriminalcheck"
for (word in word.list) {
  a <- gsub(word, paste0(" ", word), a)     
}
a
#> [1] " rose  single location criminal check"

但是我想这种方法非常有限。单例呢？ sing、let 和 singlet 都是有意义的词。