css - 在 R shiny 中编辑 renderDataTable 的 CSS

Question

我正在使用 R shiny 来呈现数据，并希望将数据表的过滤器从底部移动到顶部。我已经从 stackoverflow 得到了建议更改 CSS 的答案。但是我不熟悉CSS，谁能告诉我如何在renderDataTable 函数中修改CSS？谢谢!

引用链接:How to place DataTables column filter on top

我尝试了以下方法，但不起作用:

  output$obs <- renderDataTable({data()},
                                options = list(aoColumnDefs = list(list(fnFilter$tfoot(display = "table-header-group"))))
                                )

Answer 1

我不确定这是最好的方法，但你可以“覆盖”“tfoot”元素的 css:

例如在您的用户界面中使用这一行:

tags$head(tags$style("tfoot {display: table-header-group;}"))

不过，如果您有其他表格，您不希望表格顶部有页脚，则可能会出现问题。