title: Get same height for plots having different facet numbers, and coord_fixed?
body: <p>Let me explain in pictures what I mean:</p>
  
  <pre><code>set.seed(1)  ## dummy data.frame:
  df &lt;- data.frame( value1 = sample(5:15, 20, replace = T), value2 = sample(5:15, 20, replace = T),
                    var1 = c(rep('type1',10), rep('type2',10)), var2 = c('a','b','c','d'))
  
  ## Plot 1 
  
  ggplot() +
    geom_point(data = df, aes(value1, value2)) +
    facet_grid(~var1) +
    coord_fixed()
  
  ggsave("plot_2facet.pdf", height=5, units = 'in')
      #Saving 10.3 x 5 in image
  
  ## Plot 2  which I want to save in a separate file (!)
  
  ggplot() +
    geom_point(data = df, aes(value1, value2)) +
    facet_grid(~var2) +
    coord_fixed()
  
  ggsave("plot_4facet.pdf", height=5, units = 'in')
      #Saving 10.3 x 5 in image
  </code></pre>
  
  <p><a href="https://i.stack.imgur.com/UlZxA.jpg" rel="noreferrer"><img src="https://i.stack.imgur.com/UlZxA.jpg" alt="enter image description here"></a></p>
  
  <p>Now what happens here, that the devices have the same height, but the plots have different heights. But I would like to get the same height for the plots.</p>
  
  <p>In the code above, I tried to only specify the height, but ggsave then just takes a fixed width dimension for the device. </p>
  
  <p>I tried <code>theme(plot.margin = margin(t=1,b=1))</code>, but this did not change anything. </p>
  
  <p>Taking out <code>coord_fixed()</code> gives plots with the same height:</p>
  
  <p><a href="https://i.stack.imgur.com/BThb6.jpg" rel="noreferrer"><img src="https://i.stack.imgur.com/BThb6.jpg" alt="enter image description here"></a></p>
  
  <p>But I would like to use <code>coord_fixed()</code>.</p>
  
  <p>Is there a solution for this, or do I need to "guess" the width dimensions of the device to get the correct plot height? </p>
  
  <p>Cheers</p>
  
  <hr>
  
  <p><strong>Edit</strong></p>
  
  <p>The plots should ideally be created in separate devices/ files. </p>