How can I define a fill color for each choice of a grouped checkbox input in R with shiny?

Asked Jul 21 '20 at 11:54

Active Jul 21 '20 at 12:27

Viewed 154 times

I am able to colour all checkboxes purple with the code below. How can I define different fill colors for each choice (A, B, C, D, E)? It would be great if someone could help me!

I used following packages: install.packages("shinyWidgets") install.packages("shiny")

library(shiny) library(shinyWidgets)

ui <- fluidPage(
                fluidRow( 
                 prettyCheckboxGroup(inputId ="var", label= "Select Letter", 
                                     choices =  c("A", "B", "C", "D", "E"),
                                     selected = c("A", "B", "C", "D", "E"),
                                     inline = FALSE, width = NULL)), 
                  
 tags$style(".pretty.p-default input:checked~.state label:after {background-color: #A901DB !important;}"),
)

server <- function(input, output, ...) {
}

shinyApp(ui, server)

edited Jul 21 '20 at 12:27

asked Jul 21 '20 at 11:54

Luzia

please include all additional packages you have used. – Roman Jul 21 '20 at 11:56
See [this answer](https://stackoverflow.com/a/62466900/1100107). – Stéphane Laurent Jul 21 '20 at 12:19

How can I define a fill color for each choice of a grouped checkbox input in R with shiny?

0 Answers0