更改数据表中搜索框和输入框的背景颜色

Question

我想将数据 table 顶部的 'number of entries' 和 'search box' 的背景颜色从白色更改为灰色。这可能吗？

library(DT)
datatable(iris)

Answer 1

使用callback参数：

将 JavaScript 写入 select HTML 元素并更改它们的 CSS。

例如，我使用下面的代码修改了背景颜色。您可以使用类似的方法来更改搜索框的CSS。

DT::datatable(iris,elementId = "thistable",
              callback = DT::JS("$('#thistable div[role=\"status\"]').css('background-color','red')"))

Answer 2

library(DT)

callback <- c(
  "$('#DataTables_Table_0_length select').css('background-color', 'orange');",
  "$('#DataTables_Table_0_filter input').css('background-color', 'yellow');"
)

datatable(iris, callback = JS(callback))

更改数据表中搜索框和输入框的背景颜色

Change the background color of search box and entry box in a datatable

r

dt