R：使用WriteXLS将空数据帧写入excel时保留列名

Question

我正在使用WriteXLS包将R中的列表写入excel，列表中的每个元素都在单独的工作表上。

除非任何数据帧为空，否则此方法正常 - 对于空数据帧，它将列名称写为＆＃39; X.WRITEXLS.COMMENT＆＃39;而我希望显示实际的列名。

例如，让我们创建一个测试列表并写入excel

library(WriteXLS)
testList <- list('mysheet1' = data.frame('a' = numeric(), 'b' = numeric(), 'c' = numeric()), 'mysheet2' = data.frame('a' = 1, 'b' = 2, 'c' = 3))
WriteXLS("testList", ExcelFileName = 'test.xlsx')

列表的第二个元素很好，但是第一个元素是excel中的列名是＆＃39; X.WRITEXLS.COMMENT＆＃39;，而我希望它们是a，b和c，因为它们是在R。

的列表中

该函数在旧版本的WriteXLS（2.1.1）中可以正常工作（打印正确的列名），但在当前版本（3.5.0）中对我不起作用

任何帮助都将不胜感激。

Answer 1

我让包Marc Schwartz的维护者意识到了这一点，他已经在最新版本的软件包3.5.1中修复了这个问题。