Причина остановлена: количество обращений к 'fcn' достигло или превысило 'maxfev' == 500

Question

Я написал следующий код для производственной функции CES:

df <- data.frame(K = CESdata$Kap, L=CESdata$Lab, Q=CESdata$Out)


library(minpack.lm)
ceS<-nlsLM(df$Q~gamma * (delta*K^(-rho) +   (1-delta)*L^(-rho))^(-nu/rho), data=df, 
           start=list(gamma=0.07, delta=0.5, rho=0.25, nu=01.5), 
           trace = TRUE, control = list( maxiter=1000, reltol = 1e-5, minFactor = 1/1024,printEval = FALSE, warnOnly = FALSE),
           algorithm="LM", lower=c(0,0,-1,0), upper=c(Inf,1,Inf,Inf))


summary(ceS)

Я пробовал с другим исходным параметром, но результаты не сильно отличаются от отчетов: Reason stopped: Number of calls to 'fcn' has reached or exceeded 'maxfev' == 500. Приложите данные для любой помощи, пожалуйста. Данные