grad.default（theta，...）中的ConstrOptim错误：找不到函数“func”

Question

我正在使用constrOptim函数在最佳拟合参数上添加一个约束。我的功能是ode功能，所以我不能给出渐变。我写的是'NULL'。但是我收到了这个错误

  

'grad.default（theta，...）出错：找不到函数“func”'

uinit = rbind(c(0, 1, -1, 0, 0, 0, 0), c(1, 0, 0, 0, 0, 0, 0))

fit0 <- constrOptim(params0, sse.bigmodel, NULL,data = head(dataind, 20), ui = uinit , ci = c(0, 0), hessian = TRUE, method = c("Nelder-Mead"))
parest = fit0$par

Answer 1

我解决了这个问题。 NULL的位置很重要，而hessian = TRUE不起作用。

fit0 <- constrOptim(params0, sse.bigmodel, NULL, ui = c(0, 1, -1, 0, 0, 0, 0) , ci = c(0),data = head(dataind, 20))

parest = fit0 $ par