如何更改r shinydashboard中数据表中列的对齐方式？

Question

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

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

此代码未显示任何错误，但对齐方式未更改。我搜索了很多但是这样做的唯一方法似乎是我正在使用的那个。有没有办法改变对齐方式？任何帮助，将不胜感激。 TIA

Answer 1

从DT文档的helper functions部分：

  

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

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

library(DT)

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