R Shiny - Farbe des Textes in navbarPage ändern

Question

Ich erreiche, um die Hintergrundfarbe der Navbar mit CSS-Stil, aber nicht die Farbe des Textes zu ändern ... Ich reproduzieren ein grundlegendes Beispiel unten zu meinem Code.

ui <- function(){ 

    bootstrapPage('', 

     navbarPage(title = 'Hello'), 

     tags$style(type = 'text/css', '.navbar { background-color: #262626; 
               font-family: Arial; 
               font-size: 13px; 
               color: #FF0000; }', 

           '.navbar-dropdown { background-color: #262626; 
                font-family: Arial; 
                font-size: 13px; 
                color: #FF0000; }')) 

} 

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


shinyApp(ui = ui, server = server) 

Answer 1

Nun, Sie müssen nur die Farbe auf diesem CSS ändern.

'.navbar-default .navbar-brand { 
         color: #cc3f3f;}' 

Hier bin ich auf # cc3f3f einen roten Text zu erhalten.

ui <- function(){ 

    bootstrapPage('', 

       navbarPage(title = 'Hello'), 

       tags$style(type = 'text/css', '.navbar { background-color: #262626; 
          font-family: Arial; 
          font-size: 13px; 
          color: #FF0000; }', 

          '.navbar-dropdown { background-color: #262626; 
          font-family: Arial; 
          font-size: 13px; 
          color: #FF0000; }', 

          '.navbar-default .navbar-brand { 
          color: #cc3f3f; 
          }' 

          )) 

} 

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


shinyApp(ui = ui, server = server)