title: R shiny - background of sidebar panel
body: <p>Let's say, I've got a simple shiny application and I would like to change <b>sidebar panel background</b>. I've tried with css, but I've managed only to change the whole background. Can you help me?</p>
  
  <p>My ui.R:</p>
  
  <pre><code>    library(shiny)
  
      shinyUI(fluidPage(
        includeCSS("www/moj_styl.css"),
  
        titlePanel("Hello Shiny!"),
  
        sidebarLayout(
         sidebarPanel(
            sliderInput("bins",
                        "Number of bins:",
                        min = 1,
                        max = 50,
                        value = 30)
          ),
  
          mainPanel(
            plotOutput("distPlot")
          )
        )
      ))
  </code></pre>
  
  <p>and my server.R:</p>
  
  <pre><code>    library(shiny)
  
      shinyServer(function(input, output) {
  
        output$distPlot &lt;- renderPlot({
          x    &lt;- faithful[, 2]  # Old Faithful Geyser data
          bins &lt;- seq(min(x), max(x), length.out = input$bins + 1)
  
          hist(x, breaks = bins, col = 'darkgray', border = 'white')
        })
  
      })
  </code></pre>
  
  <p>and moj_styl.css:</p>
  
  <pre><code>    body {
          background-color: #dec4de;
      }
  
      body, label, input, button, select { 
        font-family: 'Arial';
      }
  </code></pre>