R语言中如何向cowplot的plot_grid动态传入多个绘图对象？

你之前的错误在于试图传递变量名字符串给plot_grid，但这个函数需要的是实际的绘图对象（比如ggplot对象），而非字符串形式的变量名。以下是两种可行的解决方案：

方案1：提前将绘图对象存入列表（推荐） #

生成绘图时直接把对象存在列表里，避免创建单独的pl1、pl2这类变量，之后直接用plot_grid的plots参数传入列表：

library(cowplot)
library(ggplot2)

gnum <- 5

# 1. 生成绘图对象并存入列表
plots_list <- lapply(1:gnum, function(idx) {
  # 这里替换成你生成单个绘图的代码
  ggplot(data.frame(x = 1:10, y = rnorm(10)), aes(x, y)) +
    geom_point() +
    ggtitle(paste("绘图", idx))
})

# 2. 传入plot_grid组合
plot_grid(plots = plots_list, nrow = gnum)

方案2：用do.call传递动态参数 #

如果已经有了pl1、pl2…这类单独的绘图变量，可以先用mget把它们提取到列表，再用do.call调用plot_grid：

# 假设已经存在pl1到pl5这些绘图对象
plots_list <- mget(paste0("pl", 1:gnum))

# 用do.call将列表元素作为plot_grid的参数传入
do.call(plot_grid, c(plots_list, list(nrow = gnum)))

为什么之前的方法失败？ #

• noquote(paste0(...))只是生成了类似"pl1,pl2,..."的字符串，plot_grid无法将字符串转换为对应的绘图对象（这就是你看到的Cannot convert object of class noquote into a grob警告的原因）。
• cat(...)只是把字符串打印出来，返回值是NULL，自然无法生成绘图。

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