css - R Shiny : center tabsetPanel labels

Question

如何将 tabsetPanel 中可见的标签居中？目前我使用 renderUI 定义选项卡:

output$uiTabs <- renderUI({
tabsetPanel(tabPanel("visualization1",tableOutput("table1")),
            tabPanel("visualization2",tableOutput("table2"))) })

然后在 UI 中我有这样的东西:

    column(8,align="center",
           uiOutput("uiTabs"))

现在表格居中对齐，但选项卡本身不是。

Answer 1

这是我们在 OP 的评论部分讨论的内容

#tabsetPanel holds all of the tabs

tabsetPanel( 

#create an empty tab with white text being the label
#Inserting more text will increase the width of the label

            tabPanel(tags$div( 

              HTML(paste(tags$span(style="color:white", "TYPE A LONG STRING HERE TO SPACE ACCORDINGLY"), sep = "")) 

             )), 

#Other tabpanels

            tabPanel("visualization1",tableOutput("table1")), 

            tabPanel("visualization2",tableOutput("table2")), 

#Make sure to keep the selected = "tabPanel id" here because 
#it will default select the empty panel 

selected = "visualization1")