r - 我创建的函数中的变量没有保存在环境中

Question

我想阅读纽约时报的一篇文章并将文章解析为两个列表paragraphs（这是一个具有常规段落结构的嵌套列表），paragraphs_separated_by_word其中每个单词用空格分隔，嵌套列表结构与paragraphs. 当我不将它作为函数运行时，代码可以工作，创建了两个变量并且一切都很好，但是当我将它作为函数运行时则不行。我想让它成为一个函数，以便我可以对其进行适当的测试。

library('rvest') 

url <- 'https://www.nytimes.com/2020/07/15/science/hybrid-sturgeon-paddlefish.html'

readNYTLink <- function(url){
  NYTwebpage <- read_html(url)
  NYTwebpage %>%
    html_nodes(".css-53u6y8 p") %>%
    html_text() -> paragraphs
  NYTwebpage %>%
    html_nodes(".css-53u6y8 p") %>%
    html_text() %>%
    str_split(' ') -> paragraphs_separated_by_word
}

任何想法，将不胜感激。

标签： r