使用Action按钮Write.csv-Java 学习之路

所以基本上我试图做一个小的排序设置，一旦完成某个分析，我想将生成的某个数据集导出到预定义的位置和预定义的名称（基于之前选择的输入） . 为此，我使用了单击时执行此操作的操作按钮，

observeEvent(input$export_button, {
        write.csv(input_dummy_data4ads,paste0("Dummy Files/",unique(input_dummy_data4ads$Dependent_Variable),"_", unique(input_dummy_data4ads$Model_Type),"_", unique(input_dummy_data4ads$AGM),".csv"),row.names = F,na="")
           })

这里的问题是，如果我单击一次操作按钮，它会生成所需的csv文件并在所需的位置 . 但是按下它一次后，它取值为1（输入$ export_button），所以当我使用单选按钮选择一组新输入并根据它生成一个新的图（通过单击另一个操作按钮）时，该应用程序会保存一个在所需位置使用新名称（基于新输入）的新csv文件 . 我想要做的是重置操作按钮的值，以便只在我每次单击时创建新的csv文件 .

我试图理解这一点，但无法合并https://github.com/rstudio/shiny/issues/167

1 回答

闪存中有特定的功能，在你的ui中使用 downloadButton ，在服务器中使用 downloadHandler .

server.R:

output$export_data <- downloadHandler(
  filename = function() {
    paste0("Dummy Files/", unique(input_dummy_data4ads$Dependent_Variable), "_", unique(input_dummy_data4ads$Model_Type), "_", unique(input_dummy_data4ads$AGM), ".csv")
  },
  content = function(con) {
    write.csv(input_dummy_data4ads, con, row.names = F, na = "")
  }
)

ui.R:

downloadButton("export_data", "Export")

回复于 2024-05-10T00:25:35+08:00

使用Action按钮Write.csv

1 回答

相关问题