title: Remove white space above and below ggplot2 plot after resizing columns
body: <p>My geom_col() graph in a shiny app was too chunky so I reduced the column widths but then I was left with a massive gap between the two columns.  I brought them close together with theme(aspect.ratio = 3/5).  My remaining problem is the white space above and below the viz which are taking up space as part of the plot.  How do I fix?</p>
  <pre><code>  output$share &lt;- renderPlot({
      filtered_year() %&gt;%
        ggplot() +
        aes(x = candidate, y = votes_perc, fill= party) +
        geom_col(position = &quot;dodge&quot;, width=0.75) +
        labs(x = &quot;&quot;) +
        theme_light() +
        theme(axis.title.x = element_blank(),
              axis.text.y = element_text(size = 12,  margin=margin(0,0,0,0)),
              axis.text.x = element_blank(),
              legend.position = &quot;none&quot;,
              line = element_blank(),
              panel.border = element_blank(),
              aspect.ratio = 3/5) + 
        scale_fill_manual(values = c(&quot;#5390D9&quot;, &quot;#D90429&quot;)) +
        coord_flip() +
        geom_text(aes(label = paste0(votes_perc,&quot;%&quot;)), position = position_stack(vjust = 0.8), size = 8 ,colour = &quot;#ffffff&quot;)
      
    })    
  </code></pre>
  <p><a href="https://i.stack.imgur.com/M5JAP.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/M5JAP.png" alt="screen_shot_of_problem" /></a></p>