r语言 - 调整ggbiplot图的大小

Question

我正在寻找重新配置ggbiplot情节以相互匹配的方法。我知道情节的比例不同，以"适合"情节背后的数据，但我想知道是否有人对如何使情节匹配有任何建议。

我使用rangange来制作这个多图输出:

ggarrange(p1,p2,p3,p4,
labels = c("A", "B", "C", "D"),
ncol = 2, nrow = 2)

作为示例，ggbiplots代码之一如下:

p2 <- ggbiplot(colour30.pca,ellipse=TRUE, groups = colour30$Trait.Feed.Mech., 
obs.scale = 2, var.scale = 1, labels.size = 4, varname.size = 5)+
theme_bw()+
theme(legend.position = "bottom") +
theme(legend.text=element_text(size=10)) +
guides(colour = guide_legend(nrow = 3)) +
scale_colour_npg(name="Feeding Mode (>30 Obs.)") +
xlab ("PC1 (37.4%)")+ 
ylab ("PC2 (18.0%)")

下面是我想整理一下的输出

输出图我想整理

Answer 1

• patchwork包可用于例如在特定行或列内对齐坐标轴
• 有时，一个地块的宽高比是用coord_fixed固定的，所以它们不会填满所有的空间
• 传说可以结合(例如patchwork::wrap_plots(guides = "collect"))
• 应用相同的主题，以统一字体大小等。