我正在尝试更改tabBox
in的标签样式shinydashboard
。我能够更改未选择选项卡的背景,但无法更改已选择选项卡的背景或每个选项卡中显示的文本。这是我添加到 custom.css 文件以更改未选择的选项卡背景的内容:
.nav-tabs {
background-color: #006747;
}
我尝试了类似的东西,.nav-tabs .active
但我无法得到任何工作。
此外,如果有人知道如何更改出现在您选择的选项卡旁边的彩色小条,那也将不胜感激。
我正在尝试更改tabBox
in的标签样式shinydashboard
。我能够更改未选择选项卡的背景,但无法更改已选择选项卡的背景或每个选项卡中显示的文本。这是我添加到 custom.css 文件以更改未选择的选项卡背景的内容:
.nav-tabs {
background-color: #006747;
}
我尝试了类似的东西,.nav-tabs .active
但我无法得到任何工作。
此外,如果有人知道如何更改出现在您选择的选项卡旁边的彩色小条,那也将不胜感激。
开发者工具和“检查元素”非常方便找出您要更改 css 的类。
要更改选定选项卡的条子和颜色,您可以执行以下操作:
.nav-tabs-custom .nav-tabs li.active:hover a, .nav-tabs-custom .nav-tabs li.active a {
background-color: transparent;
border-color: transparent;
}
.nav-tabs-custom .nav-tabs li.active {
border-top-color: #FFF;
}
这是一个示例(来自此处的主干代码):
library(shiny)
library(shinydashboard)
body <- dashboardBody(
fluidRow(tags$style(".nav-tabs {
background-color: #006747;
}
.nav-tabs-custom .nav-tabs li.active:hover a, .nav-tabs-custom .nav-tabs li.active a {
background-color: transparent;
border-color: transparent;
}
.nav-tabs-custom .nav-tabs li.active {
border-top-color: #FFF;
}"),
tabBox(
title = "First tabBox",
# The id lets us use input$tabset1 on the server to find the current tab
id = "tabset1", height = "250px",
tabPanel("Tab1", "First tab content"),
tabPanel("Tab2", "Tab content 2")
)
))
shinyApp(
ui = dashboardPage(
dashboardHeader(title = "tabBoxes"),
dashboardSidebar(),
body
),
server = function(input, output) {
}
)