library(ahead) library(forecast)
x <- fdeaths xreg <- ahead::createtrendseason(x) (z <- ahead::ridge2f(x, xreg = xreg, h=20)) autoplot(z)
x <- USAccDeaths xreg <- ahead::createtrendseason(x) (z <- ahead::ridge2f(x, xreg = xreg, h=20)) autoplot(z)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.