我在这里遵循示例 2.5:https://rstudio.github.io/DT/在 shiny 中创建自定义数据表容器。该示例本身似乎运行良好。但是当我尝试在 Shiny 的应用程序中运行它时,萼片和花瓣 header 没有居中。请帮忙。谢谢。
library(shiny)
runApp(list(
ui = basicPage(
h2('Iris Table'),
DT::dataTableOutput('mytable')
),
server = function(input, output) {
output$mytable = DT::renderDataTable({
# a custom table container
sketch = htmltools::withTags(table(
class = 'display',
thead(
tr(
th(rowspan = 2, 'Species'),
th(colspan = 2, 'Sepal'),
th(colspan = 2, 'Petal')
),
tr(
lapply(rep(c('Length', 'Width'), 2), th)
)
)
))
DT::datatable(iris[1:20, c(5, 1:4)], container = sketch, rownames = FALSE)
})
}
))
最佳答案
之前:
rowspan=2
添加这个:
class = 'dt-center'
关于r - 在 Shiny 中居中自定义数据表容器列标题,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/38544468/