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

这应该是一项简单的任务，但到目前为止我还不知道该怎么做

样本数据：

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)

---

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

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

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