###################################################
### code chunk number 33: Cs30_marsskf
###################################################
kf <- MARSSkf(kem)
names(kf)
# if you only need the logLik,
MARSSkf(kem, only.logLik = TRUE)
# or
logLik(kem)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.