pickerInput字体或背景色

我在我闪亮的仪表板中使用pickerInput，这很好，只是有一个问题：背景颜色和字体颜色太相似，使得过滤器选择很难阅读

有没有办法改变背景或字体颜色？如果可能的话，我想继续使用pickerInput，但是如果有一个带有selectInput或其他任何东西的方法，那就好了

在屏幕截图中生成结果的一个PickerInput示例：

output$typeOutput80 <- renderUI({
  Commodity.Name <- as.vector( unique(DF2()$Commodity.Name) )
  pickerInput("typeOutput80", "Commodity:", 
     choices=Commodity.Name, Commodity.Name [1:10000], multiple=TRUE, 
     options = list(`actions-box` = TRUE, `live-search` = TRUE, 
                    `selected-text-format`= "static", title = "Commodity List")
  )
})`

---

output$typeOutput80这是一个有点粗糙的解决方案，但它可能适合您，或者至少让您走上正确的道路

您可以使用
pickerInput
的
choicesOpt
参数来描述下拉菜单中各个选项的格式设置。在那里指定颜色、背景或重量会将相关元素更改为您选择的任何元素。诀窍在于，参数只应用于第一个选项，因此您需要为尽可能多的选项复制样式参数。我已经用
rep（）
完成了这项工作，我刚刚在那里插入了一个值（10）以匹配
选项
，但您可能希望根据商品列表数据的来源以编程方式定义该值

library(shiny)
library(shinyWidgets)

ui <- fluidPage(
  pickerInput("id", "Formatting changes", multiple=T, choices = sample(LETTERS, size = 10), 
              options = list(`actions-box` = TRUE, `live-search` = TRUE, 
                         `selected-text-format`= "static", title = "Commodity List"),
              choicesOpt = list(
                style = rep(("color: black; background: lightgrey; font-weight: bold;"),10)))
)

server <- function(input, output){}

shinyApp(ui, server)

库（闪亮）
图书馆（shinyWidgets）
ui这是一个有点粗糙的解决方案，但它可能适合您，或者至少让您走上正确的道路

您可以使用
pickerInput
的
choicesOpt
参数来描述下拉菜单中各个选项的格式设置。在那里指定颜色、背景或重量会将相关元素更改为您选择的任何元素。诀窍在于，参数只应用于第一个选项，因此您需要为尽可能多的选项复制样式参数。我已经用
rep（）
完成了这项工作，我刚刚在那里插入了一个值（10）以匹配
选项
，但您可能希望根据商品列表数据的来源以编程方式定义该值

library(shiny)
library(shinyWidgets)

ui <- fluidPage(
  pickerInput("id", "Formatting changes", multiple=T, choices = sample(LETTERS, size = 10), 
              options = list(`actions-box` = TRUE, `live-search` = TRUE, 
                         `selected-text-format`= "static", title = "Commodity List"),
              choicesOpt = list(
                style = rep(("color: black; background: lightgrey; font-weight: bold;"),10)))
)

server <- function(input, output){}

shinyApp(ui, server)

库（闪亮）
图书馆（shinyWidgets）
ui您能否提供至少该
pickerInput
的代码作为您目前使用和/或尝试的示例？是的，我更新了我的问题以显示示例。您能否提供至少该
pickerInput
的代码作为您目前使用和/或尝试的示例？是的，我更新了我的问题以显示一个示例。您将如何使其适应动态pickerInput？也就是说，如果在填写其他输入后填充pickerInput，并且通过服务器端的updatePickerInput对列表中的内容进行计数。@CheeniyilRamachandran，问得好。也许你可以用一个例子问一个新问题（也许基于这个例子），并描述你希望看到的具体行为？我对开始一个新问题很谨慎，因为stackoverflow对重复问题很严格。但是，如果你认为这不会是一个复制品，我会这样做：-）你会如何将其应用于动态pickerput？也就是说，如果在填写其他输入后填充pickerInput，并且通过服务器端的updatePickerInput对列表中的内容进行计数。@CheeniyilRamachandran，问得好。也许你可以用一个例子问一个新问题（也许基于这个例子），并描述你希望看到的具体行为？我对开始一个新问题很谨慎，因为stackoverflow对重复问题很严格。但如果你认为这不会是一个复制品，我会这样做：-）