Nothing
## ----include=FALSE------------------------------------------------------------
library(ctsmTMB)
## -----------------------------------------------------------------------------
# Create model object
obj = ctsmTMB$new()
# Add system equations
obj$addSystem(
dx ~ theta * (mu-x) * dt + sigma_x*dw
)
## -----------------------------------------------------------------------------
obj$addObs(
log(y) ~ x, obsnames = "log_y"
)
## ----error=TRUE---------------------------------------------------------------
try({
obj$setVariance(
y ~ sigma_y^2
)
})
## -----------------------------------------------------------------------------
obj$setVariance(
log_y ~ sigma_y^2
)
## ----eval=FALSE---------------------------------------------------------------
# obj$addObs(
# log(y) ~ x,
# y ~ x,
# y^2+z^3 ~ x,
# obsnames = c("log_y", NA, "y2_plus_z3")
# )
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.