Write.csvアクションボタンを使用して

Question

基本的に私はソートの小さな設定をしようとしています。特定の分析が完了すると、生成された特定のデータセットを定義済みの場所と定義済みの名前にエクスポートします以前に選択された入力）。この目的のために、私は、クリックされたアクションボタンを使用し、これを行い、ここで

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の値（input $ export_button）が得られます。ラジオボタンを使って新しい入力を選択し、それに基づいて新しいプロットを生成すると、別のアクションボタンをクリックすると、新しい場所に新しい名前で新しいcsvファイルを作成します。私がやろうとしているのは、新しいcsvファイルが毎回クリックされたときにのみ作成されるように、アクションボタンの値をリセットすることです。

私はこれを理解しようとしたが、サーバーであなたのUIとdownloadHandlerでdownloadButtonを使用し、このため光沢内の特定の機能がありますhttps://github.com/rstudio/shiny/issues/167

Answer 1

それを組み込むことができませんでした。

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")