2017-08-28 129 views
1

我有一個dataTable在我的R閃亮的應用程序中的框()。數據表輸出框()在R閃亮:大小沒有反應

當我更改頁面的大小時,dataTable的大小不會更改以保留在其框中。我的情節輸出在同一個盒子裏沒有問題調整大小,但數據表。

關於修復數據表寬度的想法?

下面是使用R的mpg數據集來演示我的UI問題的一些代碼。利用窗口大小來查看我所指的大小問題。

library(shiny) 
library(shinydashboard) 
library(data.table) 


ui <- dashboardPage(
    dashboardHeader(), 
    dashboardSidebar(width = 325), 
    dashboardBody( 
    fluidPage(
     box(width = 12, 
      tabsetPanel(
      tabPanel("Summary", 
         dataTableOutput("coeffTable")) 
      )   
    ) 
    ))) 

server <- function(input, output){ 
    data<-mpg 

output$coeffTable<-renderDataTable({ 
    data.table(data[,1:2]) 
    },options = list(lengthMenu = c(5, 10, -1), pageLength = 5)) 

} 
shinyApp(ui = ui, server = server) 
+1

你究竟是如何生產這張桌子? (即你的代碼是什麼......) – patrick

+0

需要我的用戶界面?讓我通過它篩選一個基本的結構,我可以分享....基本上它是一個儀表板主體部分中的框,並在框中的tabsetpanel – SarahGC

+0

@patrick看到 – SarahGC

回答

2

這適用於DT包。使用像這樣:

library(DT) 

output$coeffTable <- DT::renderDataTable({... 

DT::dataTableOutput("coeffTable")