代码之家  ›  专栏  ›  技术社区  ›  AK94

将滚动条添加到shiny中的框中

  •  4
  • AK94  · 技术社区  · 7 年前

    我使用box()函数在R闪亮的仪表板页面上实现了一个方框,它加载表并表示一列人口数字。然而,这些数字超出了表中的数字,看起来非常糟糕。我希望在框中添加一个滚动条,这样数据就可以保留在框中,我可以轻松地向下滚动。

    box( title = "Btest", status = "primary",height = 355, solidHeader = T, 
                                  tableOutput("table1"))
    
    1 回复  |  直到 7 年前
        1
  •  6
  •   Subhasish1315    7 年前

    您可以使用库(DT)。它为JavaScript库数据表提供了一个R接口。R数据对象(矩阵或数据帧)可以在HTML页面上显示为表格,DataTables在表格中提供过滤、分页、排序和许多其他功能。

    您的代码如下所示:

    box(
    title = "View Data", 
    width = NULL,
    status = "primary", 
    solidHeader = TRUE,
    collapsible = TRUE,
    div(style = 'overflow-x: scroll', DT::dataTableOutput('view_data'))
         )
    

    在服务器r中

    view_data_fun<-eventreactive/reactive/observe/observeevent({
    
    #your table generation code
    
      })
    
    output$view_data<-DT::renderDataTable({
        DT::datatable(view_data_fun(),rownames = FALSE)%>%formatStyle(columns=colnames(view_selected_data_fun()),background = 'white',color='black')
      })
    

    您可以在%>%中更改选项格式样式。 DT information