抓取 iTunes 评论

Question

我一直在使用 itunesr 包从应用商店中抓取评论，想知道是否有人可以帮助我创建一个循环来迭代抓取所有页面，而不是像这样逐页进行我已经

   XX_reviews1 <- getReviews(123456789,'us',1)
   XX_reviews2 <- getReviews(123456789,'us',2)
   XX_reviews3 <- getReviews(123456789,'us',3)
   XX_reviews4 <- getReviews(123456789,'us',4)

fb_reviews <- rbind(fb_reviews1,fb_reviews2,fb_reviews3,fb_reviews4)

如有任何帮助，我们将不胜感激。

Answer 1

我对itunesr包一无所知，但通常你可以使用lapply函数来应用一个函数for/to多个输入。一般设置是这样的：

results <- lapply(inputs, function(n) {...})

你用 n 做点什么。在你的情况下，你想将它组合成一个 data.frame，这可以用 dplyr 包为列表完成：

install.packages('dplyr') # If you don't have it yet
library(dplyr)
dplyr::rbind_list(lapply(1:4, function(n) {getReviews(123456789,'us',n)}))

抓取 iTunes 评论

Scraping iTunes Reviews

xml

itunes

r

web-scraping

ios