###################################################
### code chunk number 9: Covar_sec4_2_covar-model-1c
###################################################
model.list$B <- "diagonal and unequal"
kem <- MARSS(dat, model = model.list)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.