Делая размер нескольких участков одинаковыми

Question

Вот MWE:

library(ggpubr)

# Box plot (bp)
bxp <- ggboxplot(ToothGrowth, x = "dose", y = "len",
             color = "dose", palette = "jco")
bxp
# Dot plot (dp)
dp <- ggdotplot(ToothGrowth, x = "dose", y = "len",
             color = "dose", palette = "jco", binwidth = 1)
dp

ggarrange(bxp, dp, bxp + rremove("x.text"), 
      labels = c("A", "B", "C"),
      ncol = 2, nrow = 2)

ggarrange(bxp,
      ncol = 2, nrow =2)

Я сделал 2 графика.Первый имеет 3 графика в сетке 2 x 2.

Второй имеет 1 график также в сетке 2 x 2.Таким образом, исходные 3 графика и последний 1 график имеют одинаковый размер.

Как я могу создать последний график в сетке 2 x 1, но он должен оставаться такого же размера, как в 2 x2 сетки?

Answer 1

Когда вы сохраняете график, например, с помощью ggsave(), он имеет параметры высоты и ширины, которые можно указать:

ggsave(filename, plot = last_plot(), device = NULL, path = NULL,
  scale = 1, width = NA, height = NA, units = c("in", "cm", "mm"),
  dpi = 300, limitsize = TRUE, ...)

Если установить его на те же числа, вы получите тот же размерсюжет.

Кроме того, если вы нажмете "Экспорт" в окне графика, а затем сохраните как изображение, вы получите изображение ниже, а в красной части вы можете указать размер изображения.

Ура!