Estimate UCARIMA Model
Arguments
- x
Univariate time series
- ucm
An UCARIMA model returned by
ucarima_model()
.- stdev
TRUE if standard deviation of the components are computed
Examples
mod1 <- arima_model("trend", delta = c(1, -2, 1))
mod2 <- arima_model("noise", var = 16)
hp <- ucarima_model(components = list(mod1, mod2))
s <- log(aggregate(retail$AutomobileDealers))
all <- ucarima_estimate(s, hp, stdev = TRUE)
plot(s, type = "l")
t <- ts(all[, 1], frequency = frequency(s), start = start(s))
lines(t, col = "blue")