Не удается получить результаты для извлечения обзора с использованием интеллектуального анализа текста в r - PullRequest
0 голосов
/ 25 апреля 2019

Я пытаюсь извлечь отзывы о конкретном продукте из FLIPKART, но не могу получить желаемые результаты

# Importing reviews data
library(rvest)
library(XML)
library(magrittr)

# Poco F1 Reviews #############################
aurl <- "https://www.flipkart.com/poco-f1-xiaomi-steel-blue-64-gb/product- 
reviews/itmf8fyhgyg3aggg?pid=MOBF85V7ZJGSTXGN"
poco_reviews <- NULL
for (i in 1:100)
{
  murl <- read_html(as.character(paste(aurl,i,sep="")))
  rev <- murl %>%
    html_nodes("div") %>%
    html_text()
  poco_reviews <- c(poco_reviews,rev)
}

Это ошибка, которую я получаю:

Error in open.connection(x, "rb") : 
  Timeout was reached: Operation timed out after 10000 milliseconds with 0 out of 0 bytes received

Спасибо.

...