Изменить шрифт и цвет заголовка окна в Shinydashboard

Question

Ниже у меня есть блестящая панель инструментов, в которой я создаю прямоугольники на основе selectInput(). Я использую css для изменения шрифта и цвета шрифта, но без результата.

## app.R ##
library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(),
  dashboardSidebar(
    selectInput("sec","Page",choices=c("Introduction","Explore Funds"),selected = "Introduction"),

  ),
  dashboardBody(
    #here's where you throw the css into the header
    tags$head(
      includeCSS(path = "C:/Users/User/Documents/AA/style.css")
    ),
    uiOutput("tabers")
  )
)

server <- function(input, output) { 
  outpu$tabers<-renderUI({
    if(input$sec=="Explore Funds"){
      fluidRow(
        box(
          title = "Histogram", status = "primary", solidHeader = TRUE,
          collapsible = TRUE

        ),
      )
    }
    else if(input$sec=="Introduction"){
      fluidRow(
        box(
          title = "Histogram2", status = "primary", solidHeader = TRUE,
          collapsible = TRUE

        ),
      )
    }
  })
  }

shinyApp(ui, server)

style.css

.tabers-header  {
   font: Calibri;
}