防止列名称在闪亮的DataTable中换行

Question

我有一个闪亮的DataTable (包"DT")，它有相当长的列名(+空格)，我希望在没有名称换行的情况下呈现它-即，在2-3行中换行。我已经启用了水平滚动来尝试和促进这一点：

renderDataTable(dataframe_with_long_colnames, ..., options = list(scrollX = TRUE))

但默认情况下，空格会折叠为新行。

我想这回答了我的问题：https://www.datatables.net/forums/discussion/8923/how-do-you-stop-the-header-from-wrapping-into-multiple-rows，但我不确定如何将其转换为R函数。

此外，此处还列出了所有DataTable选项：https://www.datatables.net/reference/option/

提前谢谢。

Answer 1

在ui.R中，在渲染表的行前添加以下行：

tags$head(tags$style("#table1  {white-space: nowrap;  }")),

将server.R文件中输出语句中的table1替换为xxxxx

output$`xxxxx`<-renderDataTable(.....

Answer 2

您可以简单地使用nowrap类：

library(DT)

dat <- data.frame(
  "This is a looooooooooooooooonnnnnnnnnnnnggggggg column name" = c(1,2),
  "This is also a looooooooooooooooooonnnnnnnnnnnggggggg column name" = c(3,4),
  check.names = FALSE
)

datatable(dat, class = "display nowrap")