如何更改 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')