Чтение списка json файлов, используемых для цикла

Question

Я пытаюсь прочитать список json файлов в моей локальной папке. Но приведенный ниже код не работает. Может ли кто-нибудь помочь мне в решении этого

json_files <- list.files(pattern = "*.json")
for(i in length(json_files))
{
json_data3[[i]] <- fromJSON(paste(readLines[[i]],collapse = ""))
}

Answer 1

Я не уверен, какую библиотеку json вы используете, но она выглядит как jsonlite:

library(jsonlite)

json_data <- lapply(list.files(pattern = "*.json"), read_json)
json_data2 <- lapply(list.files(pattern = "*.json"), fromJSON)

Чтобы сохранить имена ваших файлов в виде записей списка, вы можете сделать:

names(json_data) <- list.files(pattern= "*.json")
# OR
json_data3 <- sapply(list.files(pattern="*.json"),FUN = read_json,
                     simplify = FALSE,USE.NAMES = TRUE)