R/ll.lognorm.R

Defines functions ll.lognorm

Documented in ll.lognorm

ll.lognorm <-
function(nu,t) {
nu <- mpfr(nu, 99)
y=log(prod(exp(-((log(t)+(nu^2)/2)^2)/(2*nu^2))/(sqrt(2*pi)*nu*t)))
return(asNumeric(y))
}

Try the MixedPoisson package in your browser

Any scripts or data that you put into this service are public.

MixedPoisson documentation built on May 2, 2019, 12:40 p.m.