如何在R Shinydashboard中更改数据表中列的对齐方式？

Question

我正在闪亮的仪表板中创建一个dataTableOutput。 默认情况下，所有列均保持左对齐，我想将其更改为居中对齐。 我在我的server.R文件中使用相同的以下代码：

output$data<- renderDataTable({data()},
                            options = list(
                             columnDefs = list(list(className = 'dt-center', targets = '_all'))))

该代码未显示任何错误，但对齐方式未更改。 我已经搜索了很多，但是唯一的方法似乎是我正在使用的方法。 有什么方法可以更改对齐方式？ 任何帮助，将不胜感激。 TIA

Answer 1

从DT文档的帮助器功能部分中：

您可以将任意CSS属性传递给formatStyle（）

有关其他信息，请参见?formatStyle 。

library(DT)

datatable(diamonds[1:10,1:3]) %>%
  formatStyle('cut', `text-align` = 'center')