Функция в функции R

Question

У меня вопрос. Я хочу написать (например, эту функцию) (в R):

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

где Р (г) является функцией д. После этого я буду использовать функцию для оптимизации параметров (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