R：使用省略号参数的列表

Question

我遇到了一种情况，我需要将传递给R函数的所有额外参数并将它们滚动到对象中供以后使用。我认为功能previous question about ellipses会帮助我，但我仍然无法完全掌握如何做到这一点。下面是我想怎么做一个很简单的例子：

newmean <- function(X, ...){ 
    args <- as.list(substitute(list(...)))[-1L] 
    return(mean(X, args)) 
} 

我已经尝试了一些在上面的例子中参数的个数不同的配方，并试图在返回调用unlisting ARGS。但我无法完成这项工作。有小费吗？

我知道我能做到这一点：

newmean <- function(X, ...){ 
    return(mean(X, ...)) 
} 

但我需要有...参数中的对象，我可以序列化和回读放到另一台机子。

Answer 1

如何

newmean <- function(X, ...){ 
    args <- as.list(substitute(list(...)))[-1L] 
    z<-list(X) 
    z<-c(z,args) 
    do.call(mean,z) 
}