3 回答

TA貢獻1810條經驗 獲得超4個贊
該cowplot軟件包還具有align_plots用于此目的的功能(輸出未顯示),
both2 <- align_plots(p1, p2, align="hv", axis="tblr")
p1x <- ggdraw(both2[[1]])
p2x <- ggdraw(both2[[2]])
save_plot("cow1.png", p1x)
save_plot("cow2.png", p2x)
并將plot_grid圖保存到同一文件中。
library(cowplot)
both <- plot_grid(p1, p2, ncol=1, labels = c("A", "B"), align = "v")
save_plot("cow.png", both)

TA貢獻2051條經驗 獲得超10個贊
Arun建議將圖例移至頂部或底部:
ggplot(df, aes(x=factor(0), fill=x)) + geom_bar() + theme(legend.position = "bottom")
ggplot(df, aes(x=factor(0), fill=y)) + geom_bar() + theme(legend.position = "bottom")
在此處輸入圖片說明 在此處輸入圖片說明
現在,這些圖具有所需的相同寬度。此外,在兩種情況下,繪圖區域的大小均相等。
如果有更多因素或更長的標簽,則可能需要使用圖例,例如,在兩行或更多行中顯示圖例。theme()并guide_legend()有幾個參數可控制圖例在ggplot2。
- 3 回答
- 0 關注
- 1552 瀏覽
添加回答
舉報