У меня блестящий интерфейс, и я много использую 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)
}
)
}
Какие параметры или теги следует добавить?