plot(ldeaths)
plot(ldeaths)
month <- seasonaldummy(ldeaths)
deaths.lm <- lm(ldeaths ~ month)
tsdisplay(residuals(deaths.lm))
ldeaths.fcast <- predict(deaths.lm,
data.frame(month=I(seasonaldummyf(ldeaths,36))),
se.fit=TRUE)
Run the code above in your browser using DataCamp Workspace