r - 如何使用 vapply 下载网页？

Question

我可以使用 lapply、sapply、mapply 下载网页。

urls <- c(
    "http://stat.ethz.ch/R-manual/R-devel/library/base/html/connections.html",
    "http://en.wikipedia.org/wiki/Xz")
x1=lapply(urls,readLines)
x2=sapply(urls,readLines)
x3=mapply(con=urls,readLines)

在这个例子中如何使用 vapply？

Answer 1

你将不得不包装readLines一些总是返回相同长度向量的东西

例如

vapply(urls, function(i)  list(readLines(i)), list(1))

这是有效的，因为虽然readLines将返回可变数量的行，但它是list长度为 1 的 a 的第一个元素