修复闪亮中 DT 的宽度

【问题标题】：Fix width of a DT in shiny修复闪亮中 DT 的宽度
【发布时间】：2018-07-02 12:09:51
【问题描述】：

我正在尝试修复shiny 中非常宽的表格的宽度，但还没有做到。我在这里尝试了Shrink DT::dataTableOutput Size 的答案，但它没有用，我还尝试了https://github.com/rstudio/DT/issues/29 这里的答案，所有列的百分比和像素都没有。这是我遇到的表格和问题的示例：

shinyApp(
    ui = fluidPage(
      DT::dataTableOutput("table")
    ),
    server <- function(input, output) {
      x <- cbind(iris,iris,iris,iris)
      output$table <- DT::renderDataTable(x)
    }
  )

【问题讨论】：

标签： r shiny dt

【解决方案1】：

我认为这是你想要的：

library(shiny)
shinyApp(
  ui = fluidPage(
    DT::dataTableOutput("table",width='500px')
  ),
  server <- function(input, output) {
    x <- cbind(iris,iris,iris,iris)
    output$table <- DT::renderDataTable(x,options=list(scrollX=T))
  }
)

【讨论】：

几乎但不是，因为我不想滚动我想一次可视化整个数据，字体小没关系。我知道div(table, style = "font-size:50%") 是可能的，但这在我的真实表格中不起作用，因为我在表格中有图像，所以字体变小但表格没有。我需要一些可以缩小桌子的东西。