Running ‘testthat.R’ [4s/5s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(ceterisParibus)
  Loading required package: ggplot2
  Loading required package: gower
  > 
  > test_check("ceterisParibus")
  Welcome to DALEX (version: 0.3.0).
  This is a plain DALEX. Use 'install_dependencies()' to get all required packages.
  randomForest 4.6-14
  Type rfNews() to see new features/changes/bug fixes.
  
  Attaching package: 'randomForest'
  
  The following object is masked from 'package:ggplot2':
  
      margin
  
  ── 1. Error: output (@test_plot_interactive_what_if.R#8)  ──────────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: expect_is(plot_interactive(wi_rf_all), "ggiraph") at testthat/test_plot_interactive_what_if.R:8
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: plot_interactive(wi_rf_all)
  5: plot_interactive.what_if_explainer(wi_rf_all)
  6: ggiraph::ggiraph(code = print(pl), hover_css = "fill-opacity:.3;cursor:pointer;")
  7: girafe(code = code, ggobj = ggobj, width = width, pointsize = pointsize, width_svg = width_svg, 
         height_svg = height_svg, xml_reader_options = xml_reader_options, ...)
  8: tryCatch({
         if (!is.null(ggobj)) {
             stopifnot(inherits(ggobj, "ggplot"))
             print(ggobj)
         }
         else code
     }, finally = dev.off())
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: print(pl)
  11: print.ggplot(pl)
  12: ggplot_gtable(data)
  13: ggplot_gtable.ggplot_built(data)
  14: layout$render(geom_grobs, data, theme, plot$labels)
  15: f(..., self = self)
  16: self$facet$draw_panels(panels, self$layout, self$panel_scales_x, self$panel_scales_y, 
         self$panel_params, self$coord, data, theme, self$facet_params)
  17: f(...)
  18: render_strips(structure(labels_df, type = "rows"), structure(labels_df, type = "cols"), 
         params$labeller, theme)
  19: build_strip(x, labeller, theme, TRUE)
  20: ggstrip(grobs, theme, element, gp, horizontal, clip = "on")
  21: Summary.unit(structure(c(4.4, 4.4), unit = 8L, class = c("margin", "unit")), na.rm = FALSE)
  
            y_hat new_x             vname   x_quant quant relative_quant
  1001   4255.354  1920 construction.year 0.6268889  0.00     -0.6268889
  1001.1 4300.702  1921 construction.year 0.6268889  0.01     -0.6168889
  1001.2 4301.926  1922 construction.year 0.6268889  0.02     -0.6068889
  1001.3 4305.352  1923 construction.year 0.6268889  0.03     -0.5968889
  1001.4 4305.352  1923 construction.year 0.6268889  0.04     -0.5868889
  1001.5 4267.723  1924 construction.year 0.6268889  0.05     -0.5768889
                label
  1001   randomForest
  1001.1 randomForest
  1001.2 randomForest
  1001.3 randomForest
  1001.4 randomForest
  1001.5 randomForest
            y_hat new_x             vname   x_quant quant relative_quant
  1001   4255.354  1920 construction.year 0.6268889  0.00     -0.6268889
  1001.1 4300.702  1921 construction.year 0.6268889  0.01     -0.6168889
  1001.2 4301.926  1922 construction.year 0.6268889  0.02     -0.6068889
  1001.3 4305.352  1923 construction.year 0.6268889  0.03     -0.5968889
  1001.4 4305.352  1923 construction.year 0.6268889  0.04     -0.5868889
  1001.5 4267.723  1924 construction.year 0.6268889  0.05     -0.5768889
                label
  1001   randomForest
  1001.1 randomForest
  1001.2 randomForest
  1001.3 randomForest
  1001.4 randomForest
  1001.5 randomForest
            y_hat new_x   vname quant obs_id        label
  1001   4768.305    20 surface  0.00      0 randomForest
  1001.1 4765.291    21 surface  0.01      0 randomForest
  1001.2 4761.576    23 surface  0.02      0 randomForest
  1001.3 4760.838    24 surface  0.03      0 randomForest
  1001.4 4760.290    26 surface  0.04      0 randomForest
  1001.5 4743.734    27 surface  0.05      0 randomForest
            y_hat new_x   vname quant obs_id        label
  1001   4768.305    20 surface  0.00      0 randomForest
  1001.1 4765.291    21 surface  0.01      0 randomForest
  1001.2 4761.576    23 surface  0.02      0 randomForest
  1001.3 4760.838    24 surface  0.03      0 randomForest
  1001.4 4760.290    26 surface  0.04      0 randomForest
  1001.5 4743.734    27 surface  0.05      0 randomForest
  Top profiles    : 
         m2.price construction.year surface floor no.rooms district   _yhat_
  1958       4397              1920      20     3        2     Wola 4264.677
  1958.1     4397              1921      20     3        2     Wola 4291.510
  1958.2     4397              1922      20     3        2     Wola 4293.457
  1958.3     4397              1923      20     3        2     Wola 4298.767
  1958.4     4397              1923      20     3        2     Wola 4298.767
  1958.5     4397              1924      20     3        2     Wola 4302.630
                   _vname_ _ids_      _label_
  1958   construction.year  1958 randomForest
  1958.1 construction.year  1958 randomForest
  1958.2 construction.year  1958 randomForest
  1958.3 construction.year  1958 randomForest
  1958.4 construction.year  1958 randomForest
  1958.5 construction.year  1958 randomForest
  
  
  Top observations:
       m2.price construction.year surface floor no.rooms district   _yhat_  _y_
  1958     4397              2005      20     3        2     Wola 4094.383 4397
            _label_
  1958 randomForest
         m2.price construction.year surface floor no.rooms    district   _yhat_
  1001       4644              1920     131     3        5 Srodmiescie 4255.354
  1001.1     4644              1921     131     3        5 Srodmiescie 4300.702
  1001.2     4644              1922     131     3        5 Srodmiescie 4301.926
  1001.3     4644              1923     131     3        5 Srodmiescie 4305.352
  1001.4     4644              1924     131     3        5 Srodmiescie 4267.723
  1001.5     4644              1925     131     3        5 Srodmiescie 4264.109
                   _vname_ _ids_
  1001   construction.year  1001
  1001.1 construction.year  1001
  1001.2 construction.year  1001
  1001.3 construction.year  1001
  1001.4 construction.year  1001
  1001.5 construction.year  1001
         m2.price construction.year surface floor no.rooms    district   _yhat_
  1001       4644              1920     131     3        5 Srodmiescie 4255.354
  1001.1     4644              1921     131     3        5 Srodmiescie 4300.702
  1001.2     4644              1922     131     3        5 Srodmiescie 4301.926
  1001.3     4644              1923     131     3        5 Srodmiescie 4305.352
  1001.4     4644              1924     131     3        5 Srodmiescie 4267.723
  1001.5     4644              1925     131     3        5 Srodmiescie 4264.109
                   _vname_ _ids_
  1001   construction.year  1001
  1001.1 construction.year  1001
  1001.2 construction.year  1001
  1001.3 construction.year  1001
  1001.4 construction.year  1001
  1001.5 construction.year  1001
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 32 SKIPPED: 0 FAILED: 1
  1. Error: output (@test_plot_interactive_what_if.R#8) 
  
  Error: testthat unit tests failed
  Execution halted