1

这是一个有趣的。我正在努力做这篇文章正在做的事情。也就是说,重复和分组单词。

这个问题的问题是我想纯粹使用带有包装器stringr的 '函数来完成它。采取以下word()paste0sentence

sentence <- "Jane saw a cat and then Jane sat down."

确切的结果是

[1] "Jane saw, saw a, a cat, cat and, and then, then Jane, Jane sat, sat down."

我已经做到了这一点,但是在这个字符串的末尾word()留下了一个额外""的内容,这可能是由于我编写代码的方式,word()因为它不会留下一个空字符串。

> library(stringr)
> len <- length(strsplit(sentence, " ")[[1]])
> paste0(word(sentence, c(1, 2:len), c(2, 3:len)), collapse = ", ")
[1] "Jane saw, saw a, a cat, cat and, and then, then Jane, Jane sat, sat down., "

这可以在没有尾随的情况下", "仅使用word()函数来完成吗?

4

1 回答 1

2

我认为你startend论点word需要相同的长度(否则会发生回收)所以

paste0(word(sentence, c(1:(len-1)), c(2:len)), collapse = ", ")

或者

paste0(word(sentence, -c(len:2), -c((len-1):1)), collapse = ', ')

会成功的

于 2014-08-23T23:19:31.640 回答