我用stats4包中的mle求负指数方程的2个参数,但是总出问题。
负指数方程f(x)=a*exp(-bx)
library(stats4)
x.fuzhi=c(112,80,49,45,42,35,34,29,23,17,14,12,13,5,3,3,1)
ll<-function(a,b){n<-17
x<-x.fuzhi
-n*log(a)+b*sum(x)}##负对数似然方程
est<-mle(minuslog=ll, start=list(a=2,b=0.05))
summary(est)
结果总是Error in solve.default(oout$hessian) :
Lapack routine dgesv: system is exactly singular
请问,哪里出了问题呢?


雷达卡


京公网安备 11010802022788号







