如何在多个列表上循环生成R中的数据帧？

我需要创建一个循环，将多个列表转换为数据帧，然后将每个数据帧写入csv。我的意思是，我想（I）运行一个循环，取消列出所有列表并将它们转换为data.frames，以及（ii）将每个列表写入CSV

我运行了下面的纸条，它适用于我的一个列表，但我需要对其中许多列表执行相同的操作

用于转换数据帧中的嵌套列表（如list1）并写入为CSV的脚本

data <- as.data.frame(t(do.call(rbind,unlist(list1,recursive = FALSE))))
write.csv(data,"list1.csv"))

data
for（1中的i:nrow（完成）{
列表\u name
for（1中的i:nrow（完成）{
list\u name
fun
fun您是否尝试过
data.frame（list1）
？在R中，data.frame只是一组垂直打印在一起的列表。假设每个子列表都是您想要的data.frame的一列，这种语法甚至适用于嵌套列表。我已经知道如何从每个列表中检索每个数据帧（请参阅上面提供的脚本）但问题是我有很多列表，我想对所有列表运行相同的脚本。因此我需要一个循环。类似的问题/答案。您尝试过
data.frame（list1）吗
？在R中，data.frame只是一组垂直打印在一起的列表。这种语法甚至适用于嵌套列表，假设每个子列表都是预期data.frame的一列。我已经知道如何从每个列表中检索每个dataframe（请参阅上面提供的脚本）但问题是我有很多列表，我想对所有列表运行相同的脚本。因此我需要一个循环。一个类似的问题/答案。我认为它几乎就在那里，但我得到了以下错误：do.call中的错误（rbind，unlist（noquote（list_name），recursive=FALSE））：第二个参数必须是一个列表我想它几乎就在那里了，但我得到了以下错误：do.call中的错误（rbind，unlist（noquote（list_name），recursive=FALSE））：第二个参数必须是一个列表
for(i in 1:nrow(done){
       list_name <- done[i]
       data <- as.data.frame(t(do.call(rbind,unlist(noquote(list_name),recursive = FALSE))))
       write.csv(data,paste0(list_name,".csv"))
}

fun <- function(x){
  data <- as.data.frame(t(do.call(rbind,unlist(paste0("list",x),recursive = FALSE))))
  write.csv(data,paste0("list",x,".csv"))
}

fun(1:n)