Shrink DT::dataTableOutput Size

Question

I have a shiny interface, and I use DT::dataTableOutput and DT::renderDataTable a lot. However, I wonder if there's a way to shrink the datatable's size, e.g., making the font and the table smaller. How should I do this?

Let's say I have the following code:

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

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

What options or tags should I add?

great question! I would be interested in knowing the answer too~ — Andy Yao, Aug 10 '15 at 13:49

score 26 · Accepted Answer · answered Aug 11 '15 at 17:18

26

Try adding width: 75% to your style parameter of the div:

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

answered Aug 11 '15 at 17:18

ctloftin

454
3
9

No problem man. And of course you can tweak the sizes by changing the numbers, I just arbitrarily picked 75%. – ctloftin Aug 11 '15 at 17:41

score 0 · Answer 2 · answered Aug 10 '15 at 15:20

0

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

for the smaller font(in UI)

answered Aug 10 '15 at 15:20

Jimbo

928
1
8
15

But that only makes the font smaller, but didn't change the table size? – Miller Zhu Aug 10 '15 at 17:02
yeah i don't know about the table size lol, try some html tags – Jimbo Aug 10 '15 at 17:07

Shrink DT::dataTableOutput Size

2 Answers2

Linked