Running 'testthat.R' [24s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(deeptime)
  > 
  > test_check("deeptime")
  NULL
  == Skipped tests ===============================================================
  * The R graphics engine is too old.
  Please update to R 4.1.0 and regenerate the vdiffr snapshots. (13)
  
  == Failed tests ================================================================
  -- Error (test-coord_geo.R:111:3): ggtree scale works --------------------------
  Error: argument "caller_env" is missing, with no default
  Backtrace:
       x
    1. +-ggtree::ggtree(mammal.tree) test-coord_geo.R:111:2
    2. | +-ggplot2::ggplot(...)
    3. | \-ggplot2:::ggplot.default(...)
    4. |   +-ggplot2::fortify(data, ...)
    5. |   \-ggtree:::fortify.phylo(data, ...)
    6. |     \-as_tibble(model) %>% mutate(isTip = !.data$node %in% .data$parent)
    7. +-dplyr::mutate(., isTip = !.data$node %in% .data$parent)
    8. +-tidytree:::mutate.tbl_tree(., isTip = !.data$node %in% .data$parent)
    9. +-base::NextMethod()
   10. \-dplyr:::mutate.data.frame(., isTip = !.data$node %in% .data$parent)
   11.   \-dplyr:::mutate_cols(.data, ...)
   12.     \-DataMask$new(.data, caller_env)
   13.       \-dplyr:::initialize(...)
  -- Error (test-coord_geo.R:119:3): ggtree scale works with only fossil taxa ----
  Error: argument "caller_env" is missing, with no default
  Backtrace:
       x
    1. +-ggtree::ggtree(ceratopsianTreeRaia, position = position_nudge(x = -ceratopsianTreeRaia$root.time)) test-coord_geo.R:119:2
    2. | +-ggplot2::ggplot(...)
    3. | \-ggplot2:::ggplot.default(...)
    4. |   +-ggplot2::fortify(data, ...)
    5. |   \-ggtree:::fortify.phylo(data, ...)
    6. |     \-as_tibble(model) %>% mutate(isTip = !.data$node %in% .data$parent)
    7. +-dplyr::mutate(., isTip = !.data$node %in% .data$parent)
    8. +-tidytree:::mutate.tbl_tree(., isTip = !.data$node %in% .data$parent)
    9. +-base::NextMethod()
   10. \-dplyr:::mutate.data.frame(., isTip = !.data$node %in% .data$parent)
   11.   \-dplyr:::mutate_cols(.data, ...)
   12.     \-DataMask$new(.data, caller_env)
   13.       \-dplyr:::initialize(...)
  
  [ FAIL 2 | WARN 0 | SKIP 13 | PASS 15 ]
  Deleting unused snapshots:
  * _snaps/coord_geo/scale-on-all-facets.svg
  * _snaps/coord_geo/scale-on-fossil-ggtree.svg
  * _snaps/coord_geo/scale-on-ggtree.svg
  * _snaps/coord_trans_xy/coord-trans-xy-with-expansion.svg
  * _snaps/ggarrange2/double-ggarrange2-layout.svg
  * _snaps/ggarrange2/double-ggarrange2.svg
  * _snaps/ggarrange2/ggarrange2-layout.svg
  * _snaps/ggarrange2/ggarrange2-with-layout-layout.svg
  * _snaps/ggarrange2/ggarrange2-with-layout.svg
  * _snaps/gggeo_scale/gggeo-scale-left-and-right.svg
  * _snaps/gggeo_scale/gggeo-scale-top.svg
  Error: Test failures
  Execution halted