如何在R语言中为多个函数使用省略号（...）？

错误原因 #

你的代码报错核心在于ff函数里的...会将所有额外传入的参数同时传递给f1和f2，但f1仅接受x和y两个参数，f2仅接受a和b两个参数。

比如你调用ff(1, 2, 3)时：

• f1会收到x=1和额外的3，但f1没有第三个参数，直接触发unused argument (3)的错误。

解决方案 #

方案1：调用时使用命名参数 #

明确指定每个子函数需要的参数，避免位置参数冲突：

# 调用示例
ff(1, 2, y=3, b=4)

这样f1会拿到x=1, y=3，f2拿到a=2, b=4，不会出现多余参数。

方案2：调整ff的参数定义 #

如果不需要灵活的...，可以直接在ff里声明f1和f2需要的参数，逻辑更清晰：

ff <- function(x, a, y, b){
  cat(f1(x, y))
  cat(f2(a, b))
}

# 调用示例
ff(1, 2, 3, 4)

方案3：让...仅传递给匹配的参数（进阶） #

如果一定要保留...，可以用do.call配合参数筛选，确保每个子函数只拿到自己需要的参数：

ff <- function(x, a, ...){
  # 筛选f1需要的参数
  f1_args <- list(x=x, ...)
  f1_args <- f1_args[names(f1_args) %in% names(formals(f1))]
  cat(do.call(f1, f1_args))
  
  # 筛选f2需要的参数
  f2_args <- list(a=a, ...)
  f2_args <- f2_args[names(f2_args) %in% names(formals(f2))]
  cat(do.call(f2, f2_args))
}

# 调用示例
ff(1, 2, y=3, b=4, extra_param=5) # 多余的extra_param会被自动过滤

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