请使用apply或for循环为每个json文件提供单独的CSV，请在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 output of above code CSV output in continuation ( in a single row)
上述CSV的输出是同一行中所有json文件的列列表，因此很难区分一个json和另一个json 。
Json文件格式看起来像：- Json file1 format Json file2 format
请使用apply或for循环帮助为每个json文件使用单独的CSV文件，
