###################################################
### code chunk number 4: bad.wolf.model (eval = FALSE)
###################################################
## royale.model.0 <- list(
## B = "unconstrained", Q = "diagonal and unequal",
## R = "diagonal and unequal", U = "unequal"
## )
## kem.0 <- MARSS(royale.dat, model = royale.model.0)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.