我正在嘗試從該網站將 xml 資料抓取到資料框中:

但是我的代碼一直在到處拋出錯誤:例如:Error in open.connection(x, "rb") : Timeout was reached: [www.dmo.gov.uk] Connection timed out after 10001 milliseconds
代碼如下:
library(data.table)
library(rvest)
library(xml2)
url <- read_html("https://www.dmo.gov.uk/data/XmlDataReport?reportCode=D1A")
dt <- rbindlist(lapply(url %>% html_nodes(css = "body > View_GILTS_IN_ISSUE > View_GILTS_IN_ISSUE") %>%
xml_attrs(),
function(x) as.data.table(t((x)))))
dt <- cbind(dt[,9, with = TRUE],
as.data.table(lapply(dt[,-9, with = TRUE], as.character)))
dt
有人對我如何完成這項作業有任何建議嗎?
uj5u.com熱心網友回復:
能夠結合 mkpt_uk 的答案和此處可用的答案來解決問題:
轉載請註明出處,本文鏈接:https://www.uj5u.com/qianduan/452990.html
