函数在R中的功能

Question

我有一个问题。 我想写（例如这个）函数（在R中）：

fun=function(x){
g=x[1]; z=x[2]; d=x[3]
fun=2g+1+3z*F(d)}

其中F（d）是d的函数。之后，我将使用 optim 函数来优化参数（g，z，d）。我怎么写这个函数？

Answer 1

假设2*g+1+3*z*F(d)是fun的结果且F已定义，您只需传递optim中的初始参数

fun <- function(x){
  g<-x[1]; z<-x[2]; d<-x[3];
  2*g+1+3*z *F(d)
}

optim(c(1, 1, 1), fun)

参考：optim