r - 在图周围裁剪出ggplot2空白

Question

使用coord_fixed()更改形状后，是否可以删除ggplot2图周围的空白？我希望将上方和下方的空白区域裁剪掉，以便仅保留绘图区域和轴标签。我在不保存的情况下将绘图输出渲染到R markdown文件中。

 p <- ggplot(mtcars, aes(mpg, wt)) + geom_point()
 p + coord_fixed(ratio = 1)

下面的代码生成以下图:

Answer 1

使用时:

ggplot(mtcars, aes(mpg, wt)) + 
  geom_point() + 
  coord_fixed(ratio = 1) +
  ggsave('plot.jpg', width = 6, height = 1.5, dpi = 300)

您得到的空白空间更少:



另一种选择是使用png或jpeg设备:

p <- ggplot(mtcars, aes(mpg, wt)) + 
  geom_point() + 
  coord_fixed(ratio = 1)

jpeg('plot.jpg', width = 600, height = 150)
p
dev.off()