我有以下测试代码,用于计算MLE估计值。
import numpy as np
from scipy.optimize import minimize
def loglikelihood(params, data):
(mu, alpha, beta) = params
tlist = np.array(data)
r = np.zeros(len(tlist)+1)
for i in xrange(2,len(tlist)):
r[i] = math.exp(-beta*(tlist[i]-tlist[i-1]))*(1+r[i-1])
loglik = data[-1]*mu
loglik = loglik+alpha/beta*sum(np.exp(-beta*(tlist[-1]-tlist))-1)
loglik = loglik+np.sum(np.log(mu+alpha*r))
return -loglik
atimes=[58.98353497, 59.28420225, 59.71571013, 60.06750179, 61.24794134,
61.70692463, 61.73611983, 62.28593814, 62.51691723, 63.17370423
, 63.20125152, 65.34092403, 214.24934446, 217.0390236, 312.18830525,
319.38385604, 320.31758188, 323.50201334, 323.76801537, 323.9417007]
print minimize(loglikelihood, (0.01, 0.5,0.6), (atimes,))
它在OverflowError: math range error
给我res = minimize(loglikelihood, (0.01, 0.5,0.6), args = (atimes,))
。
我该如何解决?
我只是试图将以下最大似然估计(MLE)R代码转换为python并使用我放入的数据进行测试。
neg.loglik <- function(params, data, opt=TRUE) {
mu <- params[1]
alpha <- params[2]
beta <- params[3]
t <- sort(data)
r <- rep(0,length(t))
for(i in 2:length(t)) {
r[i] <- exp(-beta*(t[i]-t[i-1]))*(1+r[i-1])
}
loglik <- -tail(t,1)*mu
loglik <- loglik+alpha/beta*sum(exp(-beta*(tail(t,1)-t))-1)
loglik <- loglik+sum(log(mu+alpha*r))
if(!opt) {
return(list(negloglik=-loglik, mu=mu, alpha=alpha, beta=beta, t=t,
r=r))
}
else {
return(-loglik)
}
}
# insert your values for (mu, alpha, beta) in par
# insert your times for data
opt <- optim(par=c(1,2,3), fn=neg.loglik, data=data)
如果尝试更改python以返回loglik而不是-loglik。 R代码必须最大化,尽管我不清楚http://docs.scipy.org/doc/scipy/reference/tutorial/optimize.html为什么会这样。
现在我
RuntimeWarning: invalid value encountered in log
loglik = loglik+np.sum(np.log(mu+alpha*r))
答案 0 :(得分:1)
您对R函数的翻译有错误(i)基于1的基于0的索引,以及(ii)某些符号错误。
因此,该功能可能不是从下面限制而且没有最小值。
然后优化器尝试在更大和更大的参数值的减小方向上评估函数,并最终将大数字放入math.exp
溢出。
溢出错误不是来自scipy,而是来自你自己的函数。