我希望在我的绘图的第二行有四个大小相等的面板,但输出与我指定的布局不匹配.

library(ggplot2)
library(patchwork)

set.seed(1)
df<-data.frame(x=rnorm(10),y=rnorm(10))
p <- ggplot(df, aes(x=x,y=y)) +
  geom_point()

layout <- "
AAABBBBB
CCDDEEFF
"

p + p + p + p + p + p + plot_layout(design = layout)

enter image description here

推荐答案

这将产生正确的输出(改编自here)

(p + p + plot_layout(widths = c(3,5))) /
  (p + p + p +p + plot_layout(widths = c(2,2,2,2)))

R相关问答推荐

重复组的运行计数

使用列表列作为case_when LHS的输入

根据列中的数字移动单元格位置

分组时间连续值

R通过字符串中的索引连接数据帧r

导入到固定列宽的R中时出现问题

如何在四进制仪表板值框中显示值(使用shiny 的服务器计算)

具有多个依赖变量/LHS的逻辑模型

如何删除多个.CSV文件的行

如何使用R Shiny中的条件面板仅隐藏和显示用户输入,同时仍允许运行基础计算?

R:更新后无法运行控制台

如何从像glm这样的模型中提取系数表的相关性?

使用R中的正则表达式将一列分割为多列

在使用tidyModels和XGBoost的二进制分类机器学习任务中,所有模型都失败

根据1个变量绘制 colored颜色 发散的 map ,由另一个变量绘制饱和度,ggplot2不工作

基于数据集属性将科分配给物种

如何从向量构造一系列双边公式

为什么我对圆周率图的蒙特卡罗估计是空的?

仅当后续值与特定值匹配时,才在列中回填Nas

在生成打印的自定义函数中,可以通过变量将线型或 colored颜色 设置为NULL吗?