如何附加构面并保持绘图中各个构面的高度不变？

Question

我想用facet_wrap创建一个大的ggplot2。

我想要的是一种自动方式，可以按列追加各个构面，以便如果（具有相同数据）仅第一行包含四列，则构面保持默认大小将提供方面。

例如我担心地块的高度。我知道如何手动更改绘图高度，但是我需要一种自动方式。

一些示例数据：

mpg <- mpg %>%
distinct(model, year, .keep_all = TRUE)

ggplot(mpg, aes(x=year, y=hwy))+
   geom_point()+
   facet_wrap(~model)

所有构面的高度应与

相同

mpg %>%
  distinct(model, year, .keep_all = TRUE) %>%
  filter(model %in% c("4runner 4wd", "a4", "a4 quattro", "altima")) %>%

  ggplot(aes(x=year, y=hwy))+
  geom_point()+
  facet_wrap(~model, ncol = 4)

Answer 1

您可以使用Microst SDK来节省绘图高度。例如，

theme(aspect.ratio)