如何在R函数中传递内置参数？

Question

假设我有一个像这样的函数：

f1<-function(a,b,c,d,e){
cbind(rnorm(a,mean=b,sd=1),
          rnorm(a,mean=b,sd=c),
        rbinom(a,d,e))
}
f1(10,8,2,2,0.8)

我的问题是如何在f1()使用...来传递内置函数中的通用参数，例如f1() rnorm和rbiom 。

Answer 1

不确定我是否完全理解您的问题，但是如果您要询问如何为函数指定新的默认值，则可以使用Curry：

library(functional)
myrnorm <- Curry( rnorm, mean=b,sd=c )
myrnorm( a )

另外，如果您要问如何传递一组未指定的参数，这很简单：

f1<-function(a,...){
     rnorm(a,...)
}
f1(10,mean=2,sd=2)