使用downloadHandler/downloadButton在shiny应用程序上下载表格

我有一个闪亮的应用程序，我使用downloadHandler/downloadButton下载一个表。我目前已经实现了下载到csv文件。但希望能够通过单击该按钮下载与csv和tsv文件相同的表。可能吗

这是我的服务器端代码：

output$downloadTable <- downloadHandler(

  filename = function() {
    paste("type1_drugs_table_",Sys.Date(),".csv",sep="")
  },
  content = function(file) {
        write.csv(Type1(), file, row.names = FALSE, quote=FALSE, sep="\t")
    }
  }, # end of content

---

output$downloadTable您可以通过选择输入来选择要下载的数据集。请参见此处的示例：

如果您想同时下载两个文件，请参阅
谢谢您的回复。是的，我知道输入选择选项。我们已经有很多其他设置，用户必须在左侧面板中选择。因此，我们希望避免再次为此选择输入。还看到了zip文件选项。我想那是唯一的办法。
可能的重复