使用DT包隐藏响应数据表中的某些列

Question

我正在尝试使用DT包为我的闪亮应用程序创建响应数据表.我想提前隐藏某些列.例如:

library("shiny")
library("DT")
shinyApp(
  ui = fluidPage(DT::dataTableOutput('tbl')),
  server = function(input, output) {
    output$tbl = DT::renderDataTable(
      iris,extensions="Responsive"
    )
  }
)

这个输出给了我5列.当我缩小页面时,它只隐藏列.但是,我想提前隐藏最后3列,我只想每次看到前两列.有没有办法做到这一点？

更新:

示例输出

Answer 1

您可以使用DT选项或扩展名隐藏表格中的列.

如果你想让它们提前隐藏但有一个按钮让它们再次可见,那么ColVis扩展应该适合你:链接

如果您只是希望保持隐藏,请添加以下选项(不记得我现在在哪里看到它的文档..)

options=list(columnDefs = list(list(visible=FALSE, targets=columns2hide)))