我希望在使用R中的writexl包时，添加一个新的工作表，并避免替换excel中的现有工作表。

Question

我使用R中的writexl包将数据帧导出到excel工作表。

library(writexl)

但是，当我使用以下代码时，新的数据框架(resordered2)取代了现有的excel工作表，而不是导出到代码中指定的新工作表(Sheet2)中。

write_xlsx( list (Sheet2 = resordered2), "C:\\Users\\Bharath\\Desktop\\fastqc\\write.xlsx", col_names = TRUE)

关于这个问题，我能看到的唯一方法是一次创建所有的日期框架，并将它们全部列在list参数下。

我最好是想在一个接一个的数据帧上工作。是否有一种方法可以避免使用write_xlsx函数覆盖现有工作表并向excel文件中添加新工作表？

Answer 1

如果要将另一个工作表添加到现有的.xlsx文件中，可以使用库xlsx的函数write.xlsx来完成。在参数sheetName中指定新工作表的名称并设置参数append=TRUE。

例如：

library(xlsx)
write.xlsx(data, file="filename.xlsx", sheetName="newsheet", append=TRUE)

更新：，因为您对xlsx有问题，您可以尝试像这样使用这个库openxlsx

library(openxlsx)

wb <- createWorkbook()

addWorksheet(wb, sheetName = "newsheet_1")
writeData(wb, sheet = "newsheet", data_1)

addWorksheet(wb, sheetName = "newsheet_2")
writeData(wb, sheet = "newsheet_2", data_2)

saveWorkbook(wb, "filename.xlsx")