fromJSON
ожидает строку json, в вашем случае вы пытаетесь извлечь данные json и преобразовать их за один раз. Вам нужно будет передать данные с вашего URL на fromJSON
. Сделай что-нибудь подобное
mydata<-fromJSON(url(urltable[i]), flatten=TRUE)
url
будет передавать извлеченные данные в функцию fromJSON
.
Полное решение должно выглядеть как
pages <- list()
for (i in 1:length(urltable))
{
mydata<-fromJSON(url(as.character(urltable[i])), flatten=TRUE)
pages[[i]] <- mydata$entries
}
с установленным пакетом curl
вы можете обойтись без явного использования функции url
.
Кроме того, если вы хотите выполнить итерацию по всем строкам urltable
, не используйте length(urltable)
, так как он вернет число столбцов в вашем фрейме данных, которое здесь равно 1, вместо этого выполните length(urltable$url)
pages <- list()
for (i in 1:length(urltable$url))
{
mydata<-fromJSON(as.character(urltable$url[i]), flatten=TRUE)
pages[[i]] <- mydata$entries
}