Running 'spelling.R' [0s/1s]
  Running 'testthat.R' [3s/4s]
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:
       x
    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:
       x
    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:
       x
    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:
       x
    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:
       x
    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:
       x
    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