title: Adjust height of the whole header bar in dashboardHeader in shiny dashboard
body: <p>I have seen that there is a similar question here : </p>
  
  <p><a href="https://stackoverflow.com/questions/39513507/adjust-height-of-dashboardheader-in-shinydashboard">Adjust height of dashboardheader in shinydashboard</a></p>
  
  <p>but I don't have the reputation to comment on the given answer. </p>
  
  <p>The solution given to this answer will work in the case where I want to expand the size of the header. However when I reduce the size to 20 pixels this only changes the height of the title section of the header, I would like to reduce the height of the whole header bar in the shiny dashboard. 
  Is this possible ? </p>
  
  <p>Here is an example using the solution to the question mentioned: </p>
  
  <pre><code>library(shiny)
  library(shinydashboard)
  
  ui &lt;- dashboardPage(
    dashboardHeader(
      # Set height of dashboardHeader
      tags$li(class = "dropdown",
              tags$style(".main-header {max-height: 20px}"),
              tags$style(".main-header .logo {height: 20px}")
      ) 
    ),
     dashboardSidebar(
      # Adjust the sidebar
      tags$style(".left-side, .main-sidebar {padding-top: 20px}")
    ),
    dashboardBody()
  )
  
  server &lt;- function(input, output){}
  
  shinyApp(ui, server)
  </code></pre>