错误：“请求失败[429]”错误

Question

我希望从spotifr API获得Spotify on R的艺术家数据。

首先，我正在抓取数据，并将必要的数据保存在相关的数据帧中，并使用get_artist_audio_features()库中可用的spotifyr函数，我试图获取艺术家的详细信息，但每次遇到相同的错误。

我的代码可以在这里找到:第一部分可以被忽略，您可以运行它，因为它是为了刮取它，并直接继续到最后一块代码。

library(rvest)
library(dplyr)
library(spotifyr)

upcoming_artists <- "https://newsroom.spotify.com/2020-03-09/36-new-artists-around-the-world-that-are-on-spotifys-radar/"
upcoming_artists <- read_html(upcoming_artists)
upcoming_artists <- upcoming_artists %>%
  html_elements("tbody") %>%
  html_table() %>%
  `[[`(1) %>%
  tidyr::separate_rows(X2, sep = "\n")

upcoming_artists_india = upcoming_artists[33:35,]
upcoming_artists_india_list = list(length = nrow(upcoming_artists_india))
for(i in 1:nrow(upcoming_artists_india))
{
  upcoming_artists_india$X2[i] <- paste("'",upcoming_artists_india$X2[i],"'",sep="")
}
for(i in 1:nrow(upcoming_artists_india))
{
  upcoming_artists_india_list[[i]] <- get_artist_audio_features(upcoming_artists_india$X2[i])
}

我得到的错误代码是：

Request failed [429]

此错误后面总是有一些随机时间，整个错误可能如下所示：

Request failed [429]. Retrying in 59423 seconds...

代码一次也没有运行，我无法理解错误。

Answer 1

您必须将用户代理作为参数注入。

upcoming_artists <- read_html(upcoming_artists,user_agent = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/105.0.0.0 Safari/537.36")