powered by
logmeanexp
logmeanexp(x)
log(mean(exp(x)))
## generate a bifurcation diagram for the Ricker map pompExample(ricker) ll <- replicate(n=5,logLik(pfilter(ricker,Np=1000))) ## an estimate of the log likelihood: logmeanexp(ll)
Run the code above in your browser using DataLab