在 R 中使用 Openxlsx 启动空白工作簿

Initiating blank workbook using Openxlsx in R

我有两个数据 table,我想使用 openxlsx 包将它们写在一个 XLSX 文件的两个单独的工作表上。我可以编写其中一个,然后加载工作簿以添加另一个 table,但这会使事情变得复杂(我还为 XLSX 文件分配了动态名称)。

但是,目前我无法启动一个空白工作簿(一张一张地添加工作表),并且找不到任何解决方案。可能我遗漏了一些非常微不足道的东西,但目前我已经无计可施了。请帮忙

基于 openxlsx 的解决方案将不胜感激。

library(openxlsx)
df1 = data.frame(ID = c("a","b","c","d"), a = 1:4)
df2 = data.frame(ID = c("p","q","r"), b = 10:12)

wb <- createWorkbook()
addWorksheet(wb, "sheet1")
addWorksheet(wb, "sheet2")

writeDataTable(wb, "sheet1", x = df1, rowNames = F)
writeDataTable(wb, "sheet2", x = df2, rowNames = F)

saveWorkbook(wb, "writeDataTableExample.xlsx", overwrite = TRUE)
#install Rtools in case it throws error