我正在尝试从网站上抓取一堆表格。我希望能够将它们全部存储在一个或多个变量中——基本上是为了方便访问。下面的代码是我到目前为止所拥有的,我正在使用我发现的 XML 包,它在一张桌子上效果很好,但不能让它在一张桌子上工作。
i <- 1
N <- 3
DSFL1<- 'http://website/results/2012_aussies_thu/results/'
DSFL2 <- '.html'
SportHTML <- vector(length=N)
vectorOfTables <- vector(length=N)
for ( i in i:N) {
DSVL <- i
SportHTML[i] <- paste(DSFL1,DSVL,DSFL2, sep="")
Sport.table <- readHTMLTable(SportHTML[i], header=T, which=3,stringsAsFactors=F)
vectorOfTables[1] <- Sport.table
i <- i + 1
}
任何帮助,将不胜感激。