如何使用library（writexl）pakcage以自定义名称保存多个数据帧

我使用writexl包将两个数据帧保存到一个csv文件中

这是我代码的一部分：

library(writexl)
server <- function(input,output){
    filename = function(){
              paste('data.csv')
            },
    content = function(file){
    df1  <- ...
    df2 <- ...
    write_xlsx(list(df1,df2), file) 
        }
      )

库（writexl）
服务器只需命名列表中的数据帧，它就可以工作了

write_xlsx(list(df1 = df1, df2 = df2), file)


只需在列表中命名数据帧，它就会工作

write_xlsx(list(df1 = df1, df2 = df2), file)


嗨，我刚算出来：

write_xlsx(list("sheet name1" = df1, "sheet name2" = df2), file)

嗨，我刚算出来：

write_xlsx(list("sheet name1" = df1, "sheet name2" = df2), file)