在R中循环组合表

Question

library(XML)
file <- read.csv("temp_read_by_r.csv", header=FALSE)
for (n in 1:5)
{
theurl <- as.character(file[n,1])
table <- readHTMLTable(theurl)
newdata <- do.call("rbind", table)
}

当我运行上面的代码时，newdata会在第5个网址中提供该表格，但是我正在寻找1到5的合并数据。

任何帮助。 （R新手）

Answer 1

尝试

do.call(rbind, lapply(file, function(x) readHTMLTable(x)))

这会使用lapply循环播放您的文件，然后在结果列表中调用rbind。在您的代码中，因为您在循环中分配给newdata，所以在每次迭代时都会覆盖该变量。

file和table是R中的函数名，因此这些名称可能会令人困惑。