如何解决将带有R的列表提取到excel
我希望你能帮我这个忙
在工作时,我通常会操纵数据,以便最终获得通过此函数生成的元素列表,然后将其导出到单个工作簿中,并为每个拆分的元素分配一个特定的工作表:
dat <- split(tbl,tbl$x)
wb <- createWorkbook()
## Loop through the list of split tables as well as their names
## and add each one as a sheet to the workbook
Map(function(data,name){
addWorksheet(wb,name)
writeData(wb,name,data)
},dat,names(dat))
addWorksheet(wb,'name_sheet')
writeData(wb,'name_sheet',data_to_write)
## Save workbook to working directory
saveWorkbook(wb,file = "myfile.xlsx",overwrite = TRUE)
我的问题是,现在我必须导出列表列表,并且我想为每个“上级列表”都有一个工作簿,包括每个工作表中的后续列表。我已经尝试过了:
dat <- split(tbl,tbl$x)
**dat <- lapply(dat,function(x) split(x,x$`Causale Numerica`)) #added to split further**
wb <- createWorkbook()
## Loop through the list of split tables as well as their names
## and add each one as a sheet to the workbook
Map(function(data,name){
addWorksheet(wb,name)
writeData(wb,data)
},names(dat))
addWorksheet(wb,'name_sheet')
writeData(wb,data_to_write)
有什么主意吗?
谢谢
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。