Question

我使用box（）函数在R闪亮的仪表板页面上实现了一个框，它加载表并表示一个充满人口编号的列。然而，数字超过表格，看起来非常糟糕。我希望在框中添加一个滚动条，以便数据保留在框中，我可以轻松向下滚动。

box( title = "Btest", status = "primary",height = 355, solidHeader = T, 
                              tableOutput("table1"))

Answer 1

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

您的代码将如下所示：

ui.r：

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

在server.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')
  })

您可以更改％＆gt;％formatstyle中的选项。更多阅读DT information

将滚动条添加到闪亮的框中

1 个答案: