闪亮tab中的选项卡的背景色

编辑：对于光泽版本> = 0.14，请参见此处。

如果您选择“活动”类的链接作为导航的直接后代，我认为您可以得到想要的。用户界面看起来像

ui <- shinyUI(    fluidPage(        tags$style(HTML("        .tabs-above > .nav > li[class=active] > a {background-color: #000;color: #FFF;        }")),        tabsetPanel( tabPanel(     title = "Hello",     textInput(inputId = "text", label = "Input") ), tabPanel(     title = "World" )        )    ))