###################################################
### code chunk number 16: test-rock (eval = FALSE)
###################################################
## kem.rock3a <- MARSS(flatrecdat, model = list(A = A.model, tinitx = 0))
## kem.rock3b <- MARSS(flatrecdat, model = list(A = A.model, tinitx = 1))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.