# NOT RUN {
USAccDeaths %>% as_tsibble %>% model(TSLM(log(value) ~ trend() + season()))
library(tsibbledata)
olympic_running %>%
model(TSLM(Time ~ trend())) %>%
interpolate(olympic_running)
# }
Run the code above in your browser using DataLab