我在闪亮的仪表板上使用pickerInput,这很好,除了一个问题:背景颜色和字体颜色太相似,使得过滤器的选择难以阅读。
是否可以更改背景或字体颜色?如果可能的话,我想继续使用pickerInput,但是如果有一个带有selectInput的方法或其他可以的方法。
在屏幕截图中生成结果的我的选择器输入之一的示例:
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")
)
})`
答案 0 :(得分:2)
这有点棘手,但它可能对您有用,或者至少将您送往正确的路径。
您可以使用choicesOpt
的{{1}}参数来描述下拉菜单中各个选项的格式。在此处指定颜色,背景或权重会将相关元素更改为您选择的任何内容。诀窍是参数仅适用于第一个选择,因此您需要复制style参数以获得尽可能多的选择。我已经用pickerInput
完成了此操作,而我只是在其中粘贴了一个值(10)来匹配rep()
,但是您可能想根据商品列表数据的来源以编程方式定义该值
choices