循环以将r中的多个数据帧导出到Excel并命名每个工作表

我有两个数据框，我想导出到Excel，每个数据框在不同的工作表上，并为每个工作表命名

我用

write.xlsx

尝试了以下方法

以下是我的两个数据框列表，后面是我希望在新Excel工作簿中提供的标题：

list_of_datasets <- list(pivot.diagnosis, stat.pivot.quarter)
wk.title <- c("9-STD Durations", "10-STD Clinical Categories")

问题：这仅将最后一个数据帧（即

stat.pivot.quarter

）输出到Trial.xlsx电子表格

Append=TRUE

存在，因此我认为它会随着循环的每次迭代而追加，但事实并非如此似乎

append=T

不起作用

任何线索感谢

是一个轻量级软件包，在这里可以很好地为您服务

writexl::write_xlsx(
  list("sheetname1" = dataframe1, "sheetname2" = dataframe2),
  path = "path/to/save/to.xlsx"
)

---

有两个包可以写入excel，您使用的是哪一个？此外，对于列表，您需要使用

write.xlsx（数据集列表[[i]]，file=“Trial.xlsx”

可能重复或为了澄清，我的代码只针对2个数据帧，但我对许多数据帧都这么做很感兴趣。特别感兴趣的是在循环导出每个数据帧时自定义命名每个工作表。这没有帮助。我已经在使用这个包了-请参阅上面的代码。我需要一个用于许多数据帧的循环并且能够为每个迭代/数据帧循环并放置唯一的工作表名称。

writexl::write_xlsx(
  list("sheetname1" = dataframe1, "sheetname2" = dataframe2),
  path = "path/to/save/to.xlsx"
)