Running examples in ‘fabletools-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: accuracy
> ### Title: Evaluate accuracy of a forecast or model
> ### Aliases: accuracy accuracy.mdl_df accuracy.fbl_ts
> 
> ### ** Examples
> 
> if (requireNamespace("fable", quietly = TRUE)) {
+ library(fable)
+ library(tsibble)
+ library(tsibbledata)
+ library(dplyr)
+ 
+ fit <- aus_production %>%
+   filter(Quarter < yearquarter("2006 Q1")) %>% 
+   model(ets = ETS(log(Beer) ~ error("M") + trend("Ad") + season("A")))
+ 
+ # In-sample training accuracy does not require extra data provided.
+ accuracy(fit)
+ 
+ # Out-of-sample forecast accuracy requires the future values to compare with.
+ # All available future data will be used, and a warning will be given if some
+ # data for the forecast window is unavailable.
+ fc <- fit %>% 
+   forecast(h = "5 years")
+ fc %>% 
+   accuracy(aus_production)
+   
+ # It is also possible to compute interval and distributional measures of
+ # accuracy for models and forecasts which give forecast distributions.
+ fc %>% 
+   accuracy(
+     aus_production,
+     measures = list(interval_accuracy_measures, distribution_accuracy_measures)
+   )
+ }

Attaching package: ‘dplyr’

The following objects are masked from ‘package:stats’:

    filter, lag

The following objects are masked from ‘package:base’:

    intersect, setdiff, setequal, union

Warning in mask$eval_all_filter(dots, env_filter) :
  Incompatible methods ("<.Date", "<.vctrs_vctr") for "<"
Error: Detecting a corrupt tsibble object, and please reconstruct with `as_tsibble()`.
Backtrace:
     █
  1. └─`%>%`(...)
  2.   ├─base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  3.   └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
  4.     └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
  5.       └─`_fseq`(`_lhs`)
  6.         └─magrittr::freduce(value, `_function_list`)
  7.           └─function_list[[i]](value)
  8.             ├─dplyr::filter(., Quarter < yearquarter("2006 Q1"))
  9.             └─dplyr:::filter.data.frame(., Quarter < yearquarter("2006 Q1"))
 10.               ├─dplyr::dplyr_row_slice(.data, loc, preserve = .preserve)
 11.               └─tsibble:::dplyr_row_slice.tbl_ts(.data, loc, preserve = .preserve)
 12.                 └─tsibble:::update_meta(res, data, ordered = ascending, interval = interval(data))
 13.                   └─tsibble::build_tsibble(...)
 14.                     └─tsibble::
Execution halted