Пожалуйста, помогите в создании отдельных CSV для каждого файла json, используя apply или for loop, пожалуйста, помогите в том же в R
Я преобразовал все несколько файлов json в моем каталоге в один файл CSV (a.csv) используя следующий код
library(purrr)
library(jsonlite)
library(rjson)
filenames <- list.files("/Users/ankit.sharma/Desktop/R working directory", pattern="*.json", full.names=TRUE)
Json_files<-lapply(filenames, function(x) rjson::fromJSON(file=x))
Json_files_df<-as.data.frame(Json_files)
View(Json_files_df)
write.csv(Json_files_df,file='a.csv')
Выход: - Выход CSV с кодом выше Выход CSV в продолжение (в один ряд)
Вывод вышеуказанного CSV представляет собой список столбцов из всех файлов json в одной строке, что затрудняет различение одного json от другого json .
Формат файла Json выглядит следующим образом: - Формат файла Json1 Формат файла Json2
Пожалуйста, помогите в создании отдельных файлов CSV для каждого файла json, используяприменять или для цикла, пожалуйста, помогите в том же.