无法在mutate_impl（.data，dots）中加载HTTP资源错误：评估错误：1：无法加载HTTP资源

Question

我在R中编写程序用于网络报废，但是出错了。以下是我的代码

comp <- c("Microsoft", "Apple", "Google", "Amazon", "Facebook",
             "Twitter", "IBM", "Yahoo", "Netflix")

sym <- c("MSFT", "AAPL", "GOOG", "AMZN", "FB", "TWTR", "IBM", "YHOO", "NFLX")

dow_art <- function(symbol) {
  WebCorpus(GoogleFinanceSource(paste0("NASDAQ:", symbol)))}

stock_articles <- data.frame(company = comp,symbol = sym) %>%
  mutate(cor = map(symbol, dow_art))

我收到错误信息：

  

“无法在mutate_impl（.data，dots）中加载HTTP资源错误：
  评估错误：1：无法加载HTTP资源“

我添加了以下库：

library(magrittr)
(purrr)
(dplyr)
(tidyr)
(httr)
(XML)
(tm)
(tm.plugin.webmining)

请帮我纠正错误。

提前致谢。