# NOT RUN {
# A tibble is not a tsibble ----
tbl <- tibble(
date = seq(as.Date("2017-10-01"), as.Date("2017-10-31"), by = 1),
value = rnorm(31)
)
is_tsibble(tbl)
# A tsibble ----
tsbl <- as_tsibble(tbl, index = date)
is_tsibble(tsbl)
# }
Run the code above in your browser using DataLab