使用patchwork合并ggplot2绘图报错，求问题原因及解决方法

常见原因及解决方案 #

1. 版本不兼容（最常见） #

Patchwork与ggplot2版本不匹配会引发这类错误，先将两个包更新至最新版本：

update.packages(c("ggplot2", "patchwork"))

更新完成后重启R会话，再重新运行代码。

2. 验证绘图对象有效性 #

确认plt1和plt2是合法的ggplot对象：

class(plt1)
class(plt2)

正常输出应为"gg" "ggplot"，若不是，说明绘图代码本身存在问题，需检查geom_density的参数设置。

3. 规避包冲突 #

部分包（如cowplot、gridExtra）会与Patchwork产生冲突，先卸载冲突包再重新加载Patchwork：

# 以卸载cowplot为例
detach("package:cowplot", unload = TRUE)
# 重新加载patchwork
library(patchwork)

4. 用wrap_plots显式合并 #

若+运算符仍报错，尝试用wrap_plots显式指定合并方式：

wrap_plots(plt1, plt2, ncol = 2)

完整测试代码 #

更新包并重启会话后，运行以下代码验证：

library(patchwork)
library(ggplot2)
library(data.table)

ex.df <- data.table(
  x1 = rnorm(1000, 20, 50),
  x2 = rnorm(1000, 4, 5)
)

plt1 <- ex.df |> 
  ggplot() +
  geom_density(aes(x = x1))

plt2 <- ex.df |> 
  ggplot() +
  geom_density(aes(x = x2))

# 两种合并方式都可尝试
plt1 + plt2
wrap_plots(plt1, plt2)

内容的提问来源于stack exchange，提问作者B.M Njuguna