Я пытаюсь создать al oop в URL-адресе, используя строки из CSV (каждая строка CSV включает имя для замены «i» в каждом l oop, но я получаю следующую ошибку ( Ошибка в файле doc_parse_file (con, encoding = encoding, as_ html = as_ html, options = options): ожидается одно строковое значение: [тип = символ; экстент = 26258]
Конечная цель - хранить данные с каждого l oop в формате df
library(RCurl)
library(XML)
library(rvest)
library(dplyr)
csv <-read.csv('example.csv',header=T)
df <-NULL
# loop
for(i in csv){
# find url
url <- paste("https://subastas.boe.es/detalleSubasta.php?idSub=",i,"")
page <- read_html(url)
webpage <- readLines(tc <- textConnection(webpage)); close(tc)
pagetree <- htmlTreeParse(webpage, error=function(...){}, useInternalNodes = TRUE)
# grab table
tablehead <- xpathSApply(pagetree, '//*[@id="idBloqueDatos1"]/table', xmlValue)
results <- xpathSApply(pagetree, '//*[@id="idBloqueDatos1"]/table/tbody', xmlValue)
content <- as.data.frame(matrix(results, ncol = 14, byrow = TRUE))
content[,1] <- gsub("Â ", "", content[,1])
tablehead <- gsub("Â ", "", tablehead)
names(content) <- tablehead
}
Большое спасибо!