R从一个句子中获取N个单词作为字符串_R_Substring

R从一个句子中获取N个单词作为字符串

R从一个句子中获取N个单词作为字符串,r,substring,R,Substring,在R中，如何编写一个函数，其中给定一个句子，我可以传递一个整数参数，该参数以字符串形式返回结束词乙二醇句子您可以使用stringr库来完成 library(stringr) sentence <- "The quick brown fox jumps over the lazy dog" word(sentence, start = -2, end = -1) 库（stringr）句子您可以使用stringr库来完成 library(stringr) sentence <

在R中，如何编写一个函数，其中给定一个句子，我可以传递一个整数参数，该参数以字符串形式返回结束词

乙二醇

句子您可以使用stringr
库来完成
library(stringr)

sentence <- "The quick brown fox jumps over the lazy dog"
word(sentence, start = -2, end = -1)

库（stringr）
句子您可以使用stringr
库来完成
library(stringr)

sentence <- "The quick brown fox jumps over the lazy dog"
word(sentence, start = -2, end = -1)

库（stringr）
句子句子句子纯stringi
解决方案（stringr:：word（）
是过度杀伤力，使用了更多的stringi
函数。stringr
障碍包装stringi
函数）：
它还使用了一种更好的、对区域设置敏感的分词算法，该算法优于基本的R。
纯stringi
解决方案（stringr:：word（）
过于苛刻，使用了比这更多的stringi
函数。stringr
disability wrappsstringi
函数）：
它还使用了一种更好的、对区域设置敏感的分词算法，该算法优于base R。
@akrun刚刚在同一时间发布，然后编辑了它，因为它的格式很差。没有复制它。你可以将它更改为粘贴（word（句子，-2:-1），折叠=“”）
无论如何，有人投票反对我，尽管我先发布了word（句子，-2）
返回lazy
而不是lazy dog
，我遗漏了什么吗？这应该修改为word（句子，开始=-2，结束=-1）
@akrun只是在同一时间发布，然后编辑了它，因为它的格式很差。没有复制。您可以将其更改为粘贴（word（句子，-2:-1），折叠=“”）
无论如何，尽管我先发布了word（句子，-2）
返回lazy
而不是lazy dog
，我遗漏了什么吗？应该修改为word（句子，开始=-2，结束=-1）
sentence <- "The quick brown fox jumps over the lazy dog"
paste(tail(strsplit(sentence, "\\s+")[[1]], 2), collapse=" ")

library(stringi)

sentence <- "The quick brown fox jumps over the lazy dog"

tail(stri_extract_all_words(sentence)[[1]], 2)
## [1] "lazy" "dog" 

stri_join(tail(stri_extract_all_words(sentence)[[1]], 2), collapse=" ")
## [1] "lazy dog"

library(magrittr)

stri_extract_all_words(sentence)[[1]] %>% 
  tail(2) %>% 
  stri_join(collapse=" ")
## [1] "lazy dog"