Running ‘testthat.R’ [3s/5s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tibble)
  > library(ggplot2)
  > library(vdiffr)
  > library(chronochrt)
  > 
  > 
  > test_check("chronochrt")
  Error in `geom_chronochRt()`:
  ! Problem while converting geom to grob.
  ℹ Error occurred in the 1st layer.
  Caused by error in `draw_panel()`:
  ! object 'new_data_frame' not found
  Backtrace:
       ▆
    1. ├─testthat::test_check("chronochrt")
    2. │ └─testthat::test_dir(...)
    3. │   └─testthat:::test_files(...)
    4. │     └─testthat:::test_files_serial(...)
    5. │       └─testthat:::test_files_setup_state(...)
    6. │         └─testthat::source_test_setup(".", env)
    7. │           └─testthat::source_dir(path, "^setup.*\\.[rR]$", env = env, wrap = FALSE)
    8. │             └─base::lapply(files, source_file, env = env, chdir = chdir, wrap = wrap)
    9. │               └─testthat (local) FUN(X[[i]], ...)
   10. │                 └─base::eval(exprs, env)
   11. │                   └─base::eval(exprs, env)
   12. │                     └─chronochrt::plot_chronochrt(...) at tests/testthat/setup-tests.R:157:0
   13. │                       └─ggplot2::ggsave(...)
   14. │                         ├─grid::grid.draw(plot)
   15. │                         └─ggplot2:::grid.draw.ggplot(plot)
   16. │                           ├─base::print(x)
   17. │                           └─ggplot2:::print.ggplot(x)
   18. │                             ├─ggplot2::ggplot_gtable(data)
   19. │                             └─ggplot2:::ggplot_gtable.ggplot_built(data)
   20. │                               └─ggplot2:::by_layer(...)
   21. │                                 ├─rlang::try_fetch(...)
   22. │                                 │ ├─base::tryCatch(...)
   23. │                                 │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   24. │                                 │ │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   25. │                                 │ │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   26. │                                 │ └─base::withCallingHandlers(...)
   27. │                                 └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
   28. │                                   └─l$draw_geom(d, layout)
   29. │                                     └─ggplot2 (local) draw_geom(..., self = self)
   30. │                                       └─self$geom$draw_layer(...)
   31. │                                         └─ggplot2 (local) draw_layer(..., self = self)
   32. │                                           └─base::lapply(...)
   33. │                                             └─ggplot2 (local) FUN(X[[i]], ...)
   34. │                                               ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
   35. │                                               └─self$draw_panel(data, panel_params, coord, minimal = TRUE, year_lim = `<dbl>`)
   36. │                                                 └─chronochrt (local) draw_panel(...)
   37. └─base::.handleSimpleError(...)
   38.   └─rlang (local) h(simpleError(msg, call))
   39.     └─handlers[[1L]](cnd)
   40.       └─cli::cli_abort(...)
   41.         └─rlang::abort(...)
  Warning messages:
  1: Use of .data in tidyselect expressions was deprecated in tidyselect 1.2.0.
  ℹ Please use `"xmax_uncorr"` instead of `.data$xmax_uncorr` 
  2: Use of .data in tidyselect expressions was deprecated in tidyselect 1.2.0.
  ℹ Please use `"start"` instead of `.data$start` 
  3: Use of .data in tidyselect expressions was deprecated in tidyselect 1.2.0.
  ℹ Please use `"end"` instead of `.data$end` 
  4: Use of .data in tidyselect expressions was deprecated in tidyselect 1.2.0.
  ℹ Please use `"boundary_start"` instead of `.data$boundary_start` 
  5: Use of .data in tidyselect expressions was deprecated in tidyselect 1.2.0.
  ℹ Please use `"boundary_end"` instead of `.data$boundary_end` 
  Execution halted