在R shiny中编辑renderDataTable的CSS

Question

我使用R闪亮来呈现数据，并希望从下到上移动数据表的过滤器。 我已经从stackoverflow得到答案建议改变CSS。 但我不熟悉CSS，谁能告诉我如何在renderDataTable函数中修改CSS？ 谢谢！

参考链接： 如何将DataTables列过滤器置于顶部

我尝试了以下，但不起作用：

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

Answer 1

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

在你的Ui中使用例如这一行：

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

但是，如果您在表格的顶部有其他不需要的页脚，则可能会出现问题。