缩小 DT::dataTableOutput 大小

Posted 2023-02-14

【中文标题】缩小 DT::dataTableOutput 大小

【英文标题】：Shrink DT::dataTableOutput Size

【发布时间】：2015-11-02 11:12:02

【问题描述】：

我有一个闪亮的界面，我经常使用DT::dataTableOutput 和DT::renderDataTable。但是，我想知道是否有办法缩小数据表的大小，例如，使字体和表格更小。我该怎么做？

假设我有以下代码：

foo <- function()
  shinyApp(
    ui = fluidPage(
      DT::dataTableOutput("table")
    ),

    server <- function(input, output) 
      x <- data.frame(1:5, 2:6)
      output$table <- DT::renderDataTable(x)
    
  )

我应该添加哪些选项或标签？

【问题讨论】：

好问题！我也有兴趣知道答案~

【参考方案1】：

尝试将width: 75% 添加到div 的style 参数中：

div(DT::dataTableOutput("table"), style = "font-size: 75%; width: 75%")

【讨论】：

没问题的人。当然，您可以通过更改数字来调整大小，我只是随意选择了 75%。

【参考方案2】：

div(DT::dataTableOutput("table"), style = "font-size:50%")

对于较小的字体（在 UI 中）

【讨论】：

但这只是让字体变小了，并没有改变表格的大小？

是的，我不知道桌子的大小，哈哈，试试一些 html 标签