# NOT RUN {
# Fit DCRW model for state filtering and regularization -
# using trivial adapt & samples values for speed
data(ellie1)
fit <- fit_ssm(ellie1, model = "DCRW", tstep = 1, adapt = 10, samples = 100,
thin = 1, span = 0.2)
diag_ssm(fit)
map_ssm(fit)
plot_fit(fit)
# }
Run the code above in your browser using DataLab