如何在R语言中实现类似Python的数组传参调用函数功能？

你要的类似Python*args的拆包传参效果，在R中有多种原生或常用生态的实现方式，不用手动封装函数：

1. 原生R方案：do.call（兼容性最高，无需额外安装包） #

do.call是R内置的动态调用函数的方法，支持将列表作为参数批量传递给目标函数：

# 你的原函数
f <- function(x,y, optional1=1, optional2=2, optional3=3) {
  return(x + y + optional1 + optional2 + optional3)
}

# 对应Python示例的位置参数传递
args <- list(10, 20)
# 拼接固定参数和动态参数列表后传入
do.call(f, c(list(1, 2), args))
# 输出结果为36，和Python示例结果完全一致

如果需要指定修改特定参数，用命名列表即可，不需要考虑参数位置：

custom_args <- list(optional2 = 20, optional3 = 30)
do.call(f, c(list(x = 1, y = 2), custom_args))
# 输出结果为54，optional1保留默认值1

2. Tidyverse生态方案：rlang::inject （写法最接近Python拆包逻辑） #

如果你习惯用tidyverse系列工具，可以用!!! splice操作符实现和Python几乎一致的拆包效果：

library(rlang)

args <- list(optional1 = 10, optional2 = 20)
inject(f(1, 2, !!!args))
# 输出结果为36

3. 高频调用场景方案：purrr::partial 生成偏函数 #

如果你需要多次使用固定的自定义参数调用函数，可以用partial直接生成预设参数的新函数，比手动封装更简洁：

library(purrr)

# 固定optional1=10、optional2=20，生成新函数g
g <- partial(f, optional1 = 10, optional2 = 20)
# 调用时只需要传入未固定的x、y参数即可
g(1, 2)
# 输出结果为36

补充说明 #

你之前提到的...参数也可以配合do.call使用，实现自定义封装函数的参数透传：

g <- function(x, y, ...) {
  do.call(f, c(list(x = x, y = y), list(...)))
}
# 调用时可以灵活传入任意可选参数
g(1, 2, optional1 = 10, optional3 = 30)

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