if (FALSE) { # requireNamespace("fable", quietly = TRUE)
library(fable)
library(tsibbledata)
# The fastest running times for the olympics are missing for years during
# world wars as the olympics were not held.
olympic_running
olympic_running %>%
model(TSLM(Time ~ trend())) %>%
interpolate(olympic_running)
}
Run the code above in your browser using DataLab