r - Shiny - 如何更改选定标签中的字体大小？

Question

如何更改选定标签中的字体大小？

我尝试使用下面的代码，但字体大小根本没有改变。

shinyUI(fluidPage(

  sidebarPanel(

    # Change the font size.
    tags$style(type='text/css', "select {font-size: 32px !important} "),

    # Species/ pollutant options
    selectInput(
        inputId = "species",
        label = "Species:",
        choices = c(...)
        ),
   ....

有任何想法吗？

Answer 1

您的想法是正确的，但 Shiny 中的 select 输入实际上使用 selectize JavaScript 来显示 UI，而不是传统的 select HTML 标签。这就是为什么您的 CSS 没有被捕获的原因。

你想要什么而不是 select CSS 是 ".selectize-input { font-size: 32px; }
但是，如果您只有该 CSS，那么下拉菜单选项仍将是默认大小，并且文本周围也没有填充，这看起来很尴尬。以下是您可能想要使用的一些 CSS:

.selectize-input { font-size: 32px; line-height: 32px;}
.selectize-dropdown { font-size: 28px; line-height: 28px; }

因此，将其添加到应用程序中可以得到:

runApp(shinyApp(
  ui = fluidPage(
    tags$style(type='text/css', ".selectize-input { font-size: 32px; line-height: 32px;} .selectize-dropdown { font-size: 28px; line-height: 28px; }"),
    selectInput("test","Test", 1:5)
  ),
  server = function(input, output, session) {
  }
))