在闪亮的应用程序中删除下载文件中的第一列：downloadHandler 问题

Question

使用下面的代码，downloadHandler 很好地下载了我感兴趣的数据 (linedata_()) 并将其保存为 CSV 文件。 我希望将第一列放在下载的文件中。

    output$downloadData_ <- downloadHandler(
    filename = function() {
      paste("Older_Pop_Sel", Sys.Date(), ".csv", sep = ".")
    },
    content = function(file) {
      write.csv(linedata_(), file, row.names = T)
    }
  )

Answer 1

我们可以在编写 csv 时使用[-1]忽略第一列。

output$downloadData_ <- downloadHandler(
      filename = function() {
        paste("Older_Pop_Sel", Sys.Date(), ".csv", sep = ".")
      },
      content = function(file) {
        write.csv(linedata_()[-1], file, row.names = T)
      }
)