Running ‘spelling.R’ [0s/1s]
  Running ‘testthat.R’ [2s/5s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(treemapify)
  > 
  > test_check("treemapify")
  ── ERROR (test_geoms.R:4:3): geoms work with basic parameters ──────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test_geoms.R:4:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─base::print(p) test_geoms.R:63:4
   10. └─ggplot2:::print.ggplot(p)
   11.   ├─ggplot2::ggplot_gtable(data)
   12.   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   13.     └─base::Map(...)
   14.       └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   15.         └─(function (l, d) ...
   16.           └─l$draw_geom(d, layout)
   17.             └─ggplot2:::f(..., self = self)
   18.               └─self$geom$draw_layer(data, self$geom_params, layout, layout$coord)
   19.                 └─ggplot2:::f(..., self = self)
   20.                   └─base::lapply(...)
   21.                     └─ggplot2:::FUN(X[[i]], ...)
   22.                       ├─base::do.call(self$draw_panel, args)
   23.                       └─(structure(function (...) ...
   24.                         └─treemapify:::f(...)
   25.                           ├─base::do.call(treemapify, tparams)
   26.                           └─(function (data, area, subgroup, subgroup2, subgroup3, layout = "squarified", ...
   27.                             └─treemapify:::do_layout(data, subgroups, xlim, ylim)
   28.                               ├─base::do.call("rbind", lapply(groups, generate_sublayout))
   29.                               └─base::lapply(groups, generate_sublayout)
   30.                                 └─treemapify:::FUN(X[[i]], ...)
   31.                                   └─treemapify:::do_layout(...)
   32.                                     ├─base::do.call("rbind", lapply(groups, generate_sublayout))
   33.                                     └─base::lapply(groups, generate_sublayout)
   34.                                       └─treemapify:::FUN(X[[i]], ...)
   35.                                         └─treemapify:::do_layout(...)
   36.                                           ├─base::do.call("rbind", lapply(groups, generate_sublayout))
   37.                                           └─base::lapply(groups, generate_sublayout)
   38.                                             └─treemapify:::FUN(X[[i]], ...)
   39.                                               └─treemapify:::do_layout(...)
   40.                                                 └─treemapify:::treemap_f(data, area, xlim, ylim, layout)
   41.                                                   ├─data[order(-data[area]), ]
   42.                                                   ├─base::`[.data.frame`(data, order(-data[area]), )
   43.                                                   └─base::order(-data[area])
   44.                                                     └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   45.                                                       └─base:::FUN(X[[i]], ...)
   46.                                                         ├─base::as.vector(xtfrm(x))
   47.                                                         ├─base::xtfrm(x)
   48.                                                         └─base::xtfrm.default(x)
  
  ── ERROR (test_geoms.R:68:3): geom_treemap_subgroup_text works with a colour aes
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test_geoms.R:68:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─base::print(p) test_geoms.R:72:4
   10. └─ggplot2:::print.ggplot(p)
   11.   ├─ggplot2::ggplot_gtable(data)
   12.   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   13.     └─base::Map(...)
   14.       └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   15.         └─(function (l, d) ...
   16.           └─l$draw_geom(d, layout)
   17.             └─ggplot2:::f(..., self = self)
   18.               └─self$geom$draw_layer(data, self$geom_params, layout, layout$coord)
   19.                 └─ggplot2:::f(..., self = self)
   20.                   └─base::lapply(...)
   21.                     └─ggplot2:::FUN(X[[i]], ...)
   22.                       ├─base::do.call(self$draw_panel, args)
   23.                       └─(structure(function (...) ...
   24.                         └─treemapify:::f(...)
   25.                           ├─base::do.call(treemapify, tparams)
   26.                           └─(function (data, area, subgroup, subgroup2, subgroup3, layout = "squarified", ...
   27.                             └─treemapify:::do_layout(data, subgroups, xlim, ylim)
   28.                               └─treemapify:::treemap_f(this_level_data, "area", xlim, ylim, layout)
   29.                                 ├─data[order(-data[area]), ]
   30.                                 ├─base::`[.data.frame`(data, order(-data[area]), )
   31.                                 └─base::order(-data[area])
   32.                                   └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   33.                                     └─base:::FUN(X[[i]], ...)
   34.                                       ├─base::as.vector(xtfrm(x))
   35.                                       ├─base::xtfrm(x)
   36.                                       └─base::xtfrm.default(x)
  
  ── ERROR (test_layout_functions.R:8:3): treemap_squarified() correctly handles t
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(treemap_squarified(G20_onezero, area = "gdp_mil_usd")) test_layout_functions.R:8:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. └─treemapify:::treemap_squarified(G20_onezero, area = "gdp_mil_usd")
   10.   ├─data[order(-data[area]), ]
   11.   ├─base::`[.data.frame`(data, order(-data[area]), )
   12.   └─base::order(-data[area])
   13.     └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   14.       └─base:::FUN(X[[i]], ...)
   15.         ├─base::as.vector(xtfrm(x))
   16.         ├─base::xtfrm(x)
   17.         └─base::xtfrm.default(x)
  
  ── ERROR (test_plots.R:4:3): plots look the way they should ────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. └─vdiffr::expect_doppelganger(...) test_plots.R:4:2
    2.   └─vdiffr:::writer(fig, testcase, title)
    3.     ├─vdiffr:::print_plot(plot, title)
    4.     └─vdiffr:::print_plot.ggplot(plot, title)
    5.       ├─base::print(p)
    6.       └─ggplot2:::print.ggplot(p)
    7.         ├─ggplot2::ggplot_gtable(data)
    8.         └─ggplot2:::ggplot_gtable.ggplot_built(data)
    9.           └─base::Map(...)
   10.             └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   11.               └─(function (l, d) ...
   12.                 └─l$draw_geom(d, layout)
   13.                   └─ggplot2:::f(..., self = self)
   14.                     └─self$geom$draw_layer(data, self$geom_params, layout, layout$coord)
   15.                       └─ggplot2:::f(..., self = self)
   16.                         └─base::lapply(...)
   17.                           └─ggplot2:::FUN(X[[i]], ...)
   18.                             ├─base::do.call(self$draw_panel, args)
   19.                             └─(structure(function (...) ...
   20.                               └─treemapify:::f(...)
   21.                                 ├─base::do.call(treemapify, tparams)
   22.                                 └─(function (data, area, subgroup, subgroup2, subgroup3, layout = "squarified", ...
   23.                                   └─treemapify:::do_layout(data, subgroups, xlim, ylim)
   24.                                     └─treemapify:::treemap_f(data, area, xlim, ylim, layout)
   25.                                       ├─data[order(-data[area]), ]
   26.                                       ├─base::`[.data.frame`(data, order(-data[area]), )
   27.                                       └─base::order(-data[area])
   28.                                         └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   29.                                           └─base:::FUN(X[[i]], ...)
   30.                                             ├─base::as.vector(xtfrm(x))
   31.                                             ├─base::xtfrm(x)
   32.                                             └─base::xtfrm.default(x)
  
  ── ERROR (test_treemapify.R:11:3): treemapify() works with basic parameters ────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test_treemapify.R:11:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. └─treemapify::treemapify(...)
   10.   └─treemapify:::do_layout(data, subgroups, xlim, ylim)
   11.     └─treemapify:::treemap_f(this_level_data, "area", xlim, ylim, layout)
   12.       ├─data[order(-data[area]), ]
   13.       ├─base::`[.data.frame`(data, order(-data[area]), )
   14.       └─base::order(-data[area])
   15.         └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   16.           └─base:::FUN(X[[i]], ...)
   17.             ├─base::as.vector(xtfrm(x))
   18.             ├─base::xtfrm(x)
   19.             └─base::xtfrm.default(x)
  
  ── ERROR (test_treemapify.R:27:3): treemapify() returns a warning for deprecated
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_warning(...) test_treemapify.R:27:2
    2. │ └─testthat:::quasi_capture(enquo(object), label, capture_warnings)
    3. │   ├─testthat:::.capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─treemapify::treemapify(G20, area = "gdp_mil_usd", label = "country")
    7.   └─treemapify:::do_layout(data, subgroups, xlim, ylim)
    8.     └─treemapify:::treemap_f(data, area, xlim, ylim, layout)
    9.       ├─data[order(-data[area]), ]
   10.       ├─base::`[.data.frame`(data, order(-data[area]), )
   11.       └─base::order(-data[area])
   12.         └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   13.           └─base:::FUN(X[[i]], ...)
   14.             ├─base::as.vector(xtfrm(x))
   15.             ├─base::xtfrm(x)
   16.             └─base::xtfrm.default(x)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  ERROR (test_geoms.R:4:3): geoms work with basic parameters
  ERROR (test_geoms.R:68:3): geom_treemap_subgroup_text works with a colour aesthetic
  ERROR (test_layout_functions.R:8:3): treemap_squarified() correctly handles tiles with areas of 0
  ERROR (test_plots.R:4:3): plots look the way they should
  ERROR (test_treemapify.R:11:3): treemapify() works with basic parameters
  ERROR (test_treemapify.R:27:3): treemapify() returns a warning for deprecated arguments
  
  [ FAIL 6 | WARN 0 | SKIP 0 | PASS 16 ]
  Error: Test failures
  Execution halted