R 更改helpText（）中的字体和颜色

如何在闪亮的应用程序中更改helpText（）的字体和颜色

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)
shinyApp(
  ui = dashboardPagePlus(
    header = dashboardHeaderPlus(
      left_menu = tagList(
        helpText(   a(target="_blank","Login",href="https://www.youtube.com/")
        )
      )
    ),
    sidebar = dashboardSidebar(),
    body = dashboardBody(),
  ),
  server = function(input, output) { }
)

---

您可以修改元素的css类。css选择器是

。帮助阻止一个
：
（
.NAME
用于选择名为NAME的类，
a
用于选择带有标记名a的子元素）

可复制示例：

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

shinyApp(
  ui = dashboardPagePlus(
    tags$head(
       tags$style(HTML(".help-block a {color: #ff0000 !important;}"))
    ),
    header = dashboardHeaderPlus(
      left_menu = tagList(
        helpText(   a(target="_blank","Login",href="https://www.youtube.com/")
        )
      )
    ),
    sidebar = dashboardSidebar(),
    body = dashboardBody(),
  ),
  server = function(input, output) { }
)

您可以修改元素的css类。css选择器是
。帮助阻止一个
：
（
.NAME
用于选择名为NAME的类，
a
用于选择带有标记名a的子元素）

可复制示例：

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

shinyApp(
  ui = dashboardPagePlus(
    tags$head(
       tags$style(HTML(".help-block a {color: #ff0000 !important;}"))
    ),
    header = dashboardHeaderPlus(
      left_menu = tagList(
        helpText(   a(target="_blank","Login",href="https://www.youtube.com/")
        )
      )
    ),
    sidebar = dashboardSidebar(),
    body = dashboardBody(),
  ),
  server = function(input, output) { }
)