如何将 UDF 的输入参数传递给 sapply

Question

我有一个值向量和一个带有多个参数的用户定义函数。我想将我的 UDF 应用到这个向量中的每个值，而这个向量中的每个条目也是 UDF 的输入参数

t <- 1:5
myfunc <- function (setvar, var){
    return(setvar * var)
}

sapply(t, myfunc(setvar = 2), var = t)

所以在这种情况下，我想要的结果是：

2 4 6 8 10

Answer 1

你可以的

sapply(t, myfunc, setvar = 2)
#[1]  2  4  6  8 10

或者要了解您传递的具体内容，请使用匿名函数

sapply(t, function(x) myfunc(2, x))

另外，t 是 R 中的一个基本函数，因此最好为变量使用其他名称。