如何在R中程序化向函数传递t1至t9全局变量序列？

可以通过生成变量名并批量获取全局环境中的对象，再结合do.call实现参数的程序化传递，无需手动输入t1到t9。

方法一：针对t1-t9的固定场景 #

直接生成t1到t9的变量名，从全局环境中取出对应绘图对象，再传递给grid.arrange：

plotsGrid <- function() {
  # 生成t1到t9的变量名字符向量
  plot_names <- paste0("t", 1:9)
  # 从全局环境获取这些变量对应的绘图对象
  plot_list <- mget(plot_names, envir = globalenv())
  # 用do.call将列表元素作为独立参数传入grid.arrange
  allPlots <- do.call(ggtern::grid.arrange, c(plot_list, nrow = 3, ncol = 3))
  return(allPlots)
}

方法二：更灵活的通用版本 #

如果需要适配不同前缀、不同数量的绘图变量，可以给函数增加参数：

plotsGrid <- function(prefix = "t", num_plots = 9, nrow = 3, ncol = 3) {
  plot_names <- paste0(prefix, 1:num_plots)
  plot_list <- mget(plot_names, envir = globalenv())
  allPlots <- do.call(ggtern::grid.arrange, c(plot_list, nrow = nrow, ncol = ncol))
  return(allPlots)
}

调用示例：

• 默认调用（处理t1-t9）：plotsGrid()
• 处理p1-p6并排成2行3列：plotsGrid(prefix = "p", num_plots = 6, nrow = 2)

注意事项 #

• 确保全局环境中确实存在t1-t9（或指定前缀的变量），且这些变量是有效的ggtern/ggplot绘图对象，否则mget会抛出找不到对象的错误。
• 如果绘图对象不在全局环境，可调整mget的envir参数，指定对象所在的环境。

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