Question

我在R Studio控制台中构建了一个示例Shiny仪表板。我有一些表：

output$summary_table <- DT::renderDataTable(DT::datatable({
    # some code here
})

当显示此表时，它具有分页和搜索框等内容。我想删除那些但文档（https://datatables.net/reference/option/）似乎都基于编辑JS / html，例如。

$('#example').dataTable( {
    "paging": false
} );

有没有办法在DT::datatable({})内执行此操作？我不知道如何将它与我的R代码集成在一起？或者它很简单，我只是没有得到预期的用途？

我想删除分页和搜索框。

Answer 1

您可以使用：

datatable(iris,options=list(bFilter=FALSE, bPaginate=FALSE))

或仅显示表格：

datatable(iris,options = list(dom='t',bPaginate=FALSE))

完整示例代码：

library(shiny)
library(DT)

ui= basicPage(dataTableOutput("tab"))

server= function(input, output,session) {

  output$tab <-  DT::renderDataTable({datatable(iris,options=list(bFilter=FALSE, bPaginate=FALSE))})
}

shinyApp(ui, server)

修改renderDataTable中的数据表选项而不使用JS（）

1 个答案: