将列表中的数据框导出为 Excel 文件中的工作表答案

【问题标题】：Export dataframes in list as worksheets in Excel file将列表中的数据框导出为 Excel 文件中的工作表
【发布时间】：2012-08-28 18:45:19
【问题描述】：

应该是一个简单的任务，但我至今找不到方法。

样本数据：

var1 <- list('2003' = 1:3, '2004' = c(4:3), '2005' = c(6,4,1), '2006' = 1:4 )

不成功的代码：

library("XLConnect")
wb <- loadWorkbook("var1.xlsx", create = TRUE)
wb <- lapply(var1, function(x) {createSheet(wb, name = x)})
saveWorkbook(wb)

【问题讨论】：

请指定您期望的输出。您永远不会编写任何数据，这将使用 writeWorksheet 或 writeNamedRegion 调用。
我希望看到名称为“2003”、“2004”、“2005”、“2006”的工作表。 '2003' 中的 A 列应该有 A1=1, A2=2, A3=3; '2004' 应该有 A1='4', A2='3';等等。但你说得对，我忽略了写作。会调查的。

标签： r dataframe

【解决方案1】：

@Andrie 答案的更简洁版本，因为 XLConnect API 是矢量化的：

wb <- loadWorkbook("var1.xlsx", create = TRUE)
createSheet(wb, names(var1))
writeWorksheet(wb, var1, names(var1),header=FALSE)
saveWorkbook(wb)

【讨论】：