r - 在 Rshiny 中更改 materialSwitch 的颜色

Question

我正在构建 Rshiny 应用程序，我想自定义我的 materialSwitch 图标，问题是我无法更改颜色，我只能选择其中一个主题（默认、主要、信息、成功、警告、危险.)，我想用这种颜色“#c110a0”代替主要颜色

ui <- fluidPage(
  
 materialSwitch(inputId = "group1_", label = "Section 1",value = TRUE, status = "primary", right = TRUE )
)

server <- function(input, output, session) {
  
}

shinyApp(ui, server)

谢谢 ！！

标签： rshinycolorscustomization

Answer 1

您可以创建一个自定义类来将默认颜色更改为您想要的任何颜色。以下是执行此操作的说明（这些说明也可以让您更改应用程序中的其他内容！）：

• 当您运行您的应用程序时，右键单击您想要的应用程序部分并检查元素以打开 RStudio Devtools
• 在右侧的“样式”面板上，您将找到应用到它的 CSS 样式列表。其中之一将显示该对象的颜色和标识符。
• 然后，您可以以几种不同的形式将自定义 CSS 应用到闪亮的应用程序（在本文中进行了解释）。

在您的情况下，标识符是 .label-primary。

使用添加自定义 CSS

.label-primary{
background-color: #c110a0;
}

呈现以下内容：