Как решить: «Ошибка в open.connection (x,« rb »): истекло время ожидания:»? - PullRequest
1 голос
/ 17 апреля 2019

Я запускаю сценарий, и мне нужно, чтобы он попытался еще несколько секунд собрать данные, но если он все еще не может, мне нужно назначить NA в кадре данных и вернуть мне ссылки, которые не былиРабота.Я использую цикл для создания кадра данных.

LINKS <- LinksBR$LINKS_SP[1:39224]

DataSP <- matrix(nrow = 39244, ncol = 2)

DataSP <- data.frame(DataSP)

for (i in 1:length(LINKS)){
  try(
    DataSP[i,1] <- read_html(LINKS[i]) %>%
      html_node(".blabla > h1") %>%
      html_text()
  )
  try(
    Data[i,2] <- read_html(LINKS[i]) %>%
      html_node(".blabla") %>%
      html_text("span")
  )

}

Error in open.connection(x, "rb") : 
  Timeout was reached: Connection timed out after 10015 milliseconds
...