###################################################
### code chunk number 10: Cs08_model-bfgs-time
###################################################
bfgs.time <- system.time(MARSS(dat, silent = TRUE, method = "BFGS"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.