将列值以R格式写入Excel电子表格

我试图使用包

xlsx

读取模板的样式（格式），然后将数据帧中的数据写入具有相同格式的.xlsx文件。我遵循的是我可以从包的Wiki中找到的最接近的示例

问题是，当试图从我的dataframe中写入数据时，它以NULL的形式出现，尽管我试图写入的列的类与Wiki中的示例匹配，我的语法也是如此

head(fer_sheet1[,1])

# [1] "HXXX3691X" "HXXX3789X" "HXXX3759X" "HXXX37350" "HXXX3722X" "HXXX3719X"

class(fer_sheet1[,1])

# [1] "character"

Final_Report_Formatted <- createWorkbook()
Contact_List <- createSheet(Final_Report_Formatted, "Contact List")
Contact_List_rows <- createRow(Contact_List, rowIndex = 1:43)
Contact_List_cells <- createCell(Contact_List_rows, 
                                 colIndex=1:length(fer_sheet1))
mapply(setCellValue, Contact_List_cells[1:43, 1], fer_sheet1[, 1])

# $`1`
# NULL
# 
# $`2`
# NULL
# 
# $`3`
# NULL

我可以很容易地做到这一点，而不需要软件包

xlsx

，但我的想法是继续使用他们的软件包，这样我就可以在用数据填充模板工作簿后应用其格式

有趣的是，我还使用内置的

month.name

数据返回空值，如示例中所示：

mapply(setCellValue, Contact_List_cells[1:12, 1], month.name)  

---

我没有看到任何关闭/保存工作簿命令。一般来说，这种操作就像将图形打印写入文件。。。它需要一个完成函数。在这种情况下，这将是：

saveWorkbook(Final_Report_Formatted, "myChosenWBName.xlsx")

---

我没有看到任何关闭/保存工作簿命令。一般来说，这种操作就像将图形打印写入文件。。。它需要一个完成函数。在这种情况下，这将是

saveWorkbook

Whoa！你说得对！想把它变成一个答案吗？

saveWorkbook(Final_Report_Formatted, "myChosenWBName.xlsx")