如何在rShiny中取消checkboxGroupButtons标签的加粗样式？

问题说明 #

需要取消checkboxGroupButtons组件标签的默认加粗样式，同时实现部分文本斜体效果，但尝试以下两种方法均未成功：

• 在label参数中使用HTML标签（如<b>Select Indicator(s)</b> <i>(min. 1)</i>），默认加粗仍存在
• 单独用fluidRow设置自定义标签并将组件label留空，页面未渲染出自定义标签

解决方案 #

方法一：用CSS覆盖默认加粗样式

checkboxGroupButtons的标签默认被组件自带CSS设置了font-weight:bold，可以通过自定义CSS强制覆盖：

output$indicSelectgraph <- renderUI({
  tagList(
    # 自定义样式覆盖默认加粗
    tags$style(HTML("
      #indicGraph-label {
        font-weight: normal !important;
      }
    ")),
    checkboxGroupButtons(
      inputId = "indicGraph",
      label = HTML("Select Indicator(s) <i>(min. 1)</i>"),
      choices = unique(dataset$Indicator)
    )
  )
})

• 原理：通过组件inputId对应的标签ID（inputId-label）定位元素，用!important强制覆盖默认加粗样式，同时保留HTML标签的斜体效果。

方法二：分离自定义标签与组件

之前用fluidRow无效是因为未将标签和组件一同返回给renderUI，需用tagList包裹所有元素：

output$indicSelectgraph <- renderUI({
  tagList(
    fluidRow(
      tags$span("Select Indicator(s)", style = "font-weight:bold;"),
      tags$span(" <i>(min. 1)</i>", style = "font-weight:normal;")
    ),
    checkboxGroupButtons(
      inputId = "indicGraph",
      label = NULL,  # 清空组件自带标签
      choices = unique(dataset$Indicator)
    )
  )
})

• 原理：将自定义标签和组件放在同一个tagList中返回，确保Shiny渲染所有元素，同时将组件自带标签设为NULL，避免默认加粗标签干扰。

内容的提问来源于stack exchange，提问作者hkskinner97