R 代码 : webscraping

Question

我正在尝试使用 R 抓取 OECD 表格。

library(XML)
OECD <- readHTMLTable('http://stats.oecd.org/Index.aspx?DataSetCode=MEI_CLI')
OECD<- data.frame(rawOECD[[1]])

我已经设法使用上面的代码获得了基本表格，但是我无法将其转换为可展示的形式。

我会很感激你的帮助。

亲切的问候，

亚当

Answer 1

这个怎么样？

library(XML)
OECD <- readHTMLTable('http://stats.oecd.org/Index.aspx?DataSetCode=MEI_CLI',stringsAsFactors = FALSE)

n.rows <- unlist(lapply(OECD, function(t) dim(t)[1]))
out <-as.data.frame(OECD[[which.max(n.rows)]])
colnames(out) <-c("Date",out[7,-ncol(out)]) #add row names
out <-out[-(1:9),]  #clean up