Экспорт данных в список в виде рабочих листов в файл Excel

Должно быть простая задача, но я пока не могу найти, как.

Sample data:

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

Unsuccessful code:

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

Ответы на вопрос(1)

Ваш ответ на вопрос