如何在 Shiny Dashboard 的框中将表格居中

Posted

技术标签:

【中文标题】如何在 Shiny Dashboard 的框中将表格居中【英文标题】:How to center table in box in Shiny Dashboard 【发布时间】:2019-01-28 22:28:18 【问题描述】:

我很难将我在 Shiny Dashboard 中制作的表格放在一个盒子中。我使用了一个 .csv 文件,但这里有一些假数据:

Stage = c("Survey", "Work Sample", "Interview", "Stats Test")
Score = c("+33.7%", "+14.8%", "+20.8%", "+28.17%")
no1_cand = data.frame(Stage, Score)
Score =c("+37.1%", "+14.2%", "+19.3%", "+26.3%")
no2_cand = data.frame(Stage, Score)
Score = c("+33.1%", "+22.2%", "+17.3%", "+25.8%")
no3_cand = data.frame(Stage, Score)
Score = c("+29.1%", "+17.2%", "+15.3%", "+23.3%")
no4_cand = data.frame(Stage, Score)
Score = c("+22.1%", "+12.5%", "+11.4%", "+19.5%")
no5_cand = data.frame(Stage, Score)

以及我对表格和框的当前代码:

#UI
    box(title = "Top 5 Candidates",
                      status = "primary",
                      solidHeader = F,
                      collapsible = T,
                      width = 12,
                      fluidRow(
                        tableOutput('top5')))
#Server
  output$top5 = renderTable(
    top5_data
  )

目前看起来是这样的:

【问题讨论】:

【参考方案1】:

试试:

box(title = "Top 5 Candidates"
, status = "primary", solidHeader = F
, collapsible = T, width = 12
, column(12, align="center", tableOutput('top5'))) 

【讨论】:

以上是关于如何在 Shiny Dashboard 的框中将表格居中的主要内容,如果未能解决你的问题,请参考以下文章

如何更改 Shiny Dashboard 中固定控制栏的颜色

源功能不起作用 - Shiny Dashboard

Shiny:Shiny Dashboard (sidebarMenu) 中的 renderMenu 和 observeEvent 冲突

如何使用 insertUI 在 Shiny 应用程序中将 textInput 转换为输出

如何在 Shiny 的 ConditionalPanel 中将列表添加到隐藏的选项中?

将函数连接到 R Shiny Dashboard 中的 actionButton