title: How to download editable data table in shiny
body: <p>In data table, we can use argument <code>editable</code> to make the table editable.  I'm making a shiny app in which table is both editable and downloadable. </p>
  
  <p>My question is how I can download a datatable <strong>after</strong> I edit it?</p>
  
  <p>Here is my app code:</p>
  
  <pre><code>library(shiny)
  library(DT)
  
  server &lt;- function(input, output) {
  
      df = iris
  
      output$data = DT::renderDataTable ({
          DT::datatable(df, editable = list(
              target = 'row', 
              disable = list(columns = c(1, 3, 4))
          ))
  
      })
  
  
      output$downloadData &lt;- downloadHandler(
          filename = function() {
              #paste(input$dataset, ".csv", sep = "")
          },
          content = function(file) {
              write.csv(df, file, row.names = FALSE)
          }
      )
  }
  
  ui &lt;- fluidPage(
  
      DT::dataTableOutput('data'),
      downloadButton("downloadData", "Download")
  )
  
  shinyApp(ui = ui, server = server)
  </code></pre>