Shinydashboard - DataTable宽度

Question

我想创建带有情节和表格的shinydashboard，但在使用tabPanels时，dataTable始终在框外。我尝试使用column和width参数指定面板宽度，但它只影响绘图。

有没有办法限制datatable，使其仅显示在tabPanel内？ 感谢

使用以下代码呈现Tab：

dashboardBody(
tabItems(
  # First tab content
  tabItem(tabName = "dashboard_total_results",
          fluidRow(

            column(width = 15,

            tabBox(
              title = "Total deal results",
              id = "deal_res_tabset_1", height = "250px",
              tabPanel("Total revenue", 
                       plotlyOutput("total_revenue_plot"),
                       DT::dataTableOutput("total_revenue_table")),
              tabPanel("Total orders", 
                       plotlyOutput("total_orders_plot"),
                       DT::dataTableOutput("total_orders_table")),
              tabPanel("Total margin", 
                       plotlyOutput("total_margin_plot"),
                       DT::dataTableOutput("total_margin_table"))
            )

          )
          )
  )

Answer 1

我认为您实际上需要修复server部分并允许滚动列。你应该尝试这样的事情：

output$yourtablename= DT::renderDataTable(server = TRUE,{
  DT::datatable(df,
                extensions=c("Buttons",'Scroller'),
                options = list(dom = 'Bfrtip',
                               scrollY = 500,
                               scroller = TRUE,
                               scrollX=TRUE
                )
  )
})

不确定它是否有效，因为我无法重现您的问题。试着让我知道。