如何导出全局环境中的所有列表列表？

Question

使用下面的代码，我可以导出不同大小的列表。

write.xlsx(as.data.frame(do.call("cbind",list(unlist(lists)))),"lists.xlsx")

我的全球环境中有很多此类清单。要导出所有这些文件，我尝试这样做：

files <- mget(ls())

for (i in 1:length(files)){
  write.xlsx(as.data.frame(do.call("cbind",list(unlist(files[[i]])))), paste(names(files[i]), ".xlsx", sep = ""))
}

但是，当我尝试这样做时，出现了一个错误；

  

as.character（value）中的错误：无法将类型'closure'强制转换为   “字符”类型的向量另外：警告消息：在   is.na（value）：is.na（）应用于非（列表或向量）类型   “关闭”

如何将所有此类列表导出到我的工作目录？