Question

我刚刚在我的闪亮应用中切换到使用dataTables。在ui中，我在mainPanel中有dataTableOutput("affordabilityTable")，在服务器中有以下renderDataTable

output$affordabilityTable <- renderDataTable({
    dt <- data.table::copy(data.afford())
    dt <- DT::datatable(dt, options = list(autoHideNavigation = TRUE, rownames = FALSE, filter = "none"))
#   dt <- DT::datatable(dt, options = list(dom = 't',ordering = F))
dt
})

注释代码有效，因为它关闭了过滤，列排序等。它确实在第一列留下行号，我无法弄清楚如何摆脱。未注释的数据表行将显示所有过滤器功能。

我所包含的代码不够完整，不足以重现行号的问题，但我希望有一些修复对于具有一些数据表经验的人来说是显而易见的。

Answer 1

rownames参数是datatable调用的一部分，不在options内。或者更具体地说

dt <- DT::datatable(dt, rownames = FALSE, options = list(dom = 't',ordering = F))

我知道这很令人困惑。您可以认为options是原始的js模块datatable参数，而DT::datatable则添加了一些其他参数。

在DT中的R数据表闪亮的过滤器“无”选项不起作用

1 个答案: