R 闪亮数据表扩展“按钮”-如何将整个表导出到 Excel？

Question

我有一个 R Shiny 应用程序，输出元素之一是数据。我使用以下代码来显示复制、Excel、打印等按钮：

df <- datatable(df, 
                  rownames= FALSE,
                  filter = 'top',
                  extensions = 'Buttons', 
                  options = list(scrollX = TRUE
                                 , pageLength = 5
                                 , dom = 'Blfrtip'
                                 ,buttons = c('copy', 'csv', 'excel', 'pdf', 'print')
                                 )) 

该表大约有 2000 行。一切都很好，但如果我单击 CSV，它只会导出屏幕上可视化的行。有什么办法可以让这个 CSV 按钮导出 Excel 中的所有数据吗？非常感谢

Answer 1

server = FALSE在函数中设置renderDT：

output[["zzz"]] <- renderDT({
  datatable(......)
}, server = FALSE)