我一直在使用R和httr
和plyr
庫從API中提取數據。它非常直截了當,並用下面的代碼工作得很好:從XHR請求頭中提取令牌R
library(httr)
library(plyr)
headers <- c("Accept" = "application/json, text/javascript",
"Accept-Encoding" = "gzip, deflate, sdch",
"Connection" = "keep-alive",
"Referer" = "http://www.afl.com.au/stat",
"Host" = "www.afl.com.au",
"User-Agent" = "Mozilla/5.0 (Macintosh; Intel Mac OS X 10_9_5) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/41.0.2272.118 Safari/537.36",
"X-Requested-With"= "XMLHttpRequest",
"X-media-mis-token" = "f31fcfedacc75b1f1b07d5a08887f078")
query <- GET("http://www.afl.com.au/api/cfs/afl/season?seasonId=CD_S2016014", add_headers(headers))
stats <- httr::content(query)
我的問題是與問候在頭所需的請求令牌(即X-媒體誤標記)。這很容易通過檢查Chrome或Firefox中的XHR元素來手動獲取,但令牌每24小時更新一次,使手動抽取變得非常痛苦。
是否有可能使用R自動查詢網頁並提取此令牌?
你能檢查答案並進行投票和檢查嗎? –