title: Trouble with spacing/padding in shinydashboard
body: <p>I'm a first-time user of <code>shinydashboard</code> and I'm having trouble understanding how the padding works between boxes across charts on a page. For instance, the padding in the example below is quite messed up, and is an accurate representation of the issue I'm running into with my work:</p>
  
  <p><a href="https://i.stack.imgur.com/ILmPn.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/ILmPn.png" alt="enter image description here"></a></p>
  
  <p>How do I stretch the charts across (ideally setting the padding between the boxes to 0)?</p>
  
  <p>Here's the code used to create the image above:</p>
  
  <pre><code>library(shinydashboard)
  
  header &lt;- dashboardHeader()
  
  sidebar &lt;- dashboardSidebar(
      sidebarMenu(
        sliderInput("bins",
                    "Number of bins:",
                    min = 1,
                    max = 50,
                    value = 30)
        )
      )
  
  body &lt;- dashboardBody(
      fluidRow(
          column(
              width = 4,
          box(title = "Chart1",
                  plotOutput("distPlot")
              )
          ),
          column(
              width = 6,
              tabBox(
                  tabPanel(id = "tabBox1",
                           title = "Chart2",
                           plotOutput("distPlot2")
                           ),
                  tabPanel(id = "tabBox2",
                           title = "Chart3",
                           plotOutput("distPlot3")
                           ),
                  tabPanel(id = "tabBox3",
                           title = "Chart4",
                           plotOutput("distPlot4")
                           )
                  )
              ),
          column(width = 2,
                       box(title = "Chart5",
                           plotOutput("distPlot5")
                           )
                       )
          )
      )
  
  shinyApp(
      ui = dashboardPage(header, sidebar, body),
      server = function(input, output) {
        output$distPlot &lt;- renderPlot({
          x    &lt;- faithful[, 2]
          bins &lt;- seq(min(x), max(x), length.out = input$bins + 1)
          hist(x, breaks = bins, col = 'darkgray', border = 'white')
        })
  
        output$distPlot2 &lt;- renderPlot({
          x    &lt;- faithful[, 2]
          bins &lt;- seq(min(x), max(x), length.out = input$bins + 1)
  
          hist(x, breaks = bins, col = 'darkgray', border = 'white')
        })
  
        output$distPlot3 &lt;- renderPlot({
          x    &lt;- faithful[, 2]
          bins &lt;- seq(min(x), max(x), length.out = input$bins + 1)
          hist(x, breaks = bins, col = 'darkgray', border = 'white')
        })
  
        output$distPlot4 &lt;- renderPlot({
          x    &lt;- faithful[, 2]
          bins &lt;- seq(min(x), max(x), length.out = input$bins + 1)
          hist(x, breaks = bins, col = 'darkgray', border = 'white')
        })
  
        output$distPlot5 &lt;- renderPlot({
          x    &lt;- faithful[, 2]
          bins &lt;- seq(min(x), max(x), length.out = input$bins + 1)
          hist(x, breaks = bins, col = 'darkgray', border = 'white')
        })
      }
  )
  </code></pre>