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?
Try adding width: 75%
to your style
parameter of the div
:
div(DT::dataTableOutput("table"), style = "font-size: 75%; width: 75%")