我有7個地塊,我把它們分成2列,一個有3個地塊,另一個有4個地塊。我使用cowplot
的plot_grid
。結果幾乎是完美的,但是,有3個地塊的列有更大的地塊。如何縮放此列以在所有圖中獲得相同的大小並對齊每列的第一個和最後一個圖?如何將嵌套的plot_grid縮放到相同的大小?
library(ggplot2)
library(cowplot)
Value <- seq(0,1000, by = 1000/10)
Index <- 0:10
DF <- data.frame(Index, Value)
plot1 <- ggplot(DF, aes(x = Index, y = Value)) +
geom_line(linetype = 2) +
theme(aspect.ratio = 0.5)
plot2 <- ggplot(DF, aes(x = Index, y = Value)) +
geom_line(linetype = 2) +
theme(aspect.ratio = 0.5)
plot3 <- ggplot(DF, aes(x = Index, y = Value)) +
geom_line(linetype = 2) +
theme(aspect.ratio = 0.5)
plot4 <- ggplot(DF, aes(x = Index, y = Value)) +
geom_line(linetype = 2) +
theme(aspect.ratio = 0.5)
plot5 <- ggplot(DF, aes(x = Index, y = Value)) +
geom_line(linetype = 2) +
theme(aspect.ratio = 0.5)
plot6 <- ggplot(DF, aes(x = Index, y = Value)) +
geom_line(linetype = 2) +
theme(aspect.ratio = 0.5)
plot7 <- ggplot(DF, aes(x = Index, y = Value)) +
geom_line(linetype = 2) +
theme(aspect.ratio = 0.5)
col1 <- plot_grid(plot1, plot2, plot3, align = "v", ncol = 1)
col2 <- plot_grid(plot4, plot5, plot6, plot7, align = "v", ncol = 1)
plot_grid(col1, col2, ncol = 2, align = "hv")
剛剛意識到你是cowplot的作者 - 這是一個很棒的包裝,謝謝! – Aaron
難道不可能從具有更多圖的網格繼承佈局並將其應用於另一個?最後,轉移調整大小的地塊,使其居中。理論上聽起來很容易,但我也沒有得到它的工作。對'cowplot' :)來說會是一個很大的提升:) –