r - PNG ファイルの grid.arrange からの ggsave の上部と下部の出力のトリミング

Question

library(grid)
library(gridExtra)
library(png)
library(ggplot2)

library(RCurl)

PNG_1 <- readPNG(getURLContent("https://i.ibb.co/MVx1QsQ/A.png"))
PNG_2 <- readPNG(getURLContent("https://i.ibb.co/kHVGNfQ/B.png"))
PNG_3 <- readPNG(getURLContent("https://i.ibb.co/yVf3Hjg/C.png"))

grid <- grid.arrange(rasterGrob(PNG_1), rasterGrob(PNG_2), rasterGrob(PNG_3), ncol=3)

ggsave(grid,filename="output.png")

Output.png

出力寸法を手動で設定しようとしましたが、役に立ちませんでした。

大きな上下のマージンを削除したいだけです。ありがとう。