使用layout矩阵与grid.arrange实现指定多图布局失败，求修正方案

要实现你需要的布局（顶部中央increase_map、底部中央decrease_map、左右垂直居中的base21_map和base22_map），关键是构建正确的布局矩阵，并配合行高调整，让左右图处于上下图的垂直中间位置。

方法1：5行3列布局矩阵（更精细的垂直居中） #

library(gridExtra)

# 定义5行3列的布局矩阵：上下图各占2行中间列，左右图占中间1行的左右列
layout_matrix <- matrix(
  c(NA, 1, NA,
    NA, 1, NA,
    2, NA, 3,
    NA, 4, NA,
    NA, 4, NA),
  nrow = 5,
  byrow = TRUE
)

# 设置行高比例：上下区域各占2份，中间区域占1份，确保左右图垂直居中
row_heights <- c(2, 2, 1, 2, 2)

# 生成布局
grid.arrange(
  increase_map,  # 对应矩阵中的编号1
  base21_map,    # 对应矩阵中的编号2
  base22_map,    # 对应矩阵中的编号3
  decrease_map,  # 对应矩阵中的编号4
  layout_matrix = layout_matrix,
  heights = row_heights
)

方法2：3行3列布局矩阵（更简洁的实现） #

如果不需要太精细的高度控制，也可以用3行3列的矩阵，通过调整行高比例实现居中：

library(gridExtra)

# 定义3行3列的布局矩阵
layout_matrix <- matrix(
  c(NA, 1, NA,
    2, NA, 3,
    NA, 4, NA),
  nrow = 3,
  byrow = TRUE
)

# 设置行高比例：上下行高度是中间行的3倍，让左右图自然居中
row_heights <- c(3, 1, 3)

# 生成布局
grid.arrange(
  increase_map, base21_map, base22_map, decrease_map,
  layout_matrix = layout_matrix,
  heights = row_heights
)

问题说明 #

你之前的布局不符合预期，大概率是因为：

• 布局矩阵未给上下图分配足够的垂直空间，导致左右图高度与上下图一致，无法体现"垂直居中"的效果
• 未设置行高比例，上下区域和中间区域高度均等，破坏了居中的视觉效果

内容的提问来源于stack exchange，提问作者data_life