我想按特定顺序排列情节。
library(ggpubr)
data("ToothGrowth")
data("mtcars")
mtcars$name <- rownames(mtcars)
mtcars$cyl <- as.factor(mtcars$cyl)
# create boxplot
bxp <- ggboxplot(ToothGrowth, x = "dose", y = "len", color = "dose", palette = "jco")
# create dotplot
dp <- ggdotplot(ToothGrowth, x = "dose", y = "len", color = "dose", palette = "jco", binwidth = 1)
# create scatterplot
sp = ggscatter(mtcars, x = "wt", y = "mpg", add = "reg.line", conf.int = TRUE, color = "cyl", palette = "jco", shape = "cyl")+
stat_cor(aes(color = cyl), label.x = 3)
# arrange the plots
ggarrange(sp, # First row with scatter plot
ggarrange(bxp, dp, ncol = 2, labels = c("B", "C")), # Second row with box and dot plots
nrow = 2,
labels = "A") # Labels of the scatter plot
以这种方式排列绘图给了我输出。
但是，我希望以另一种方式输出，例如散点图应该位于下 Pane 中，bx 和 bp 应该位于顶部 Pane 中。我试过了
ggarrange(bxp, dp, ggarrange(sp, labels = c("C"), nrow = 1),
nrow = 2, ncol = 2, labels=c("A", "B"))
但它给了我如下:
散点图未填充下 Pane 。它位于 Pane 的一角
最佳答案
试试这个。
ggarrange(ggarrange(bxp, dp,
nrow = 1, ncol = 2, labels=c("A", "B")),
ggarrange(sp, labels = c("C"), nrow = 1, ncol = 1),
nrow = 2, ncol = 1)
关于r - 如何在R中组合多个图？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/77657900/