使用stringr的单词()重复并分组一个句子

时间:2014-08-23 22:59:21

标签: r string paste stringr

这是一个有趣的。我正在努力完成this post正在做的事情。也就是说,重复和分组单词。

这个问题的问题在于,我希望纯粹使用stringr的{​​{1}}函数和word()包装器来完成。采取以下paste0

sentence

确切的结果将是

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., " 函数的", "后跟的情况下完成吗?

1 个答案:

答案 0 :(得分:2)

我认为start的{​​{1}}和end参数需要相同的长度(否则会发生回调),所以

word

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

会做的伎俩