tests/lavine2013.R

library(pompExamples)
pompExample("lavine2013")

plot(freeze(simulate(lavine2013),seed=1891542367L))

pf <- freeze(pfilter(lavine2013,Np=1000),seed=1863695913L)
print(logLik(pf))
kingaa/pompExamples documentation built on May 20, 2019, 10:01 a.m.