Running ‘testthat.R’ [7s/9s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(factorMerger)
  Welcome to factorMerger 0.3.6!
  
  > 
  > test_check("factorMerger")
  ── 1. Error: Output format (@testvisualizations.R#14)  ─────────────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: expect_is(plot(merged), "gg") at testthat/testvisualizations.R:14
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: plot(merged)
  5: plot.factorMerger(merged)
  6: ggarrange(mergingPathPlot, responsePlot, plotGIC(x, gicPanelColor, penalty, statistic), 
         aovTable, ncol = 2, nrow = 2, align = "hv", widths = c(2, 1), heights = c(2, 
             1))
  7: purrr::map(plots, .plot_grid, ncol = ncol, nrow = nrow, labels = labels, label_size = .lab$size, 
         label_fontfamily = .lab$family, label_fontface = .lab$face, label_colour = .lab$color, 
         label_x = .lab$label.x, label_y = .lab$label.y, hjust = .lab$hjust, vjust = .lab$vjust, 
         align = align, rel_widths = widths, rel_heights = heights, legend = legend, common.legend.grob = leg)
  8: .f(.x[[i]], ...)
  9: cowplot::plot_grid(plotlist = plotlist, ...)
  10: align_plots(plotlist = plots, align = align, axis = axis)
  11: do.call(grid::unit.pmax, lapply(grobs, function(x) {
         x$widths
     }))
  12: (function (...) 
     {
         pSummary(..., op = "max")
     })(structure(list(5.5, list(0, NULL, 1L), list(0, NULL, 1L), list(0, NULL, 1L), list(
         1, NULL, 5L), list(1, structure(list(list(2.75, NULL, 8L), list(1, structure(list(
         widths = structure(list(2.2, list(1, structure(list(list(1, structure(list(label = c("(I): 1.27", 
         "(H): 0.84", "(J): 0.67", "(G): 0.14", "(A): -0.05", "(D): -0.83", "(F): -0.9", 
         "(E): -1.15"), x = structure(c(0, 0, 0, 0, 0, 0, 0, 0), unit = 0L, class = c("simpleUnit", 
         "unit")), y = structure(c(0.999998571432653, 0.857141836737609, 0.714285102042566, 
         0.571428367347522, 0.428571632652478, 0.285714897957434, 0.142858163262391, 1.42856734694394e-06
         ), unit = 4L, class = c("simpleUnit", "unit")), just = "centre", hjust = 0, vjust = 0.5, 
             rot = 0, check.overlap = FALSE, name = "GRID.text.48", gp = structure(list(
                 fontsize = 15, col = c("#619CFF", "#619CFF", "#619CFF", "#00BA38", "#00BA38", 
                 "#F8766D", "#F8766D", "#F8766D"), fontfamily = "", lineheight = 0.9, 
                 font = c(plain = 1L)), class = "gpar"), vp = NULL), class = c("text", 
         "grob", "gDesc")), 21L), list(0, NULL, 2L)), class = "unit"), 201L), 0), class = "unit"), 
         heights = structure(1, unit = 5L, class = c("simpleUnit", "unit")), name = "axis.text.y.right..titleGrob.50", 
         gp = NULL, vp = structure(list(parent = structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
         "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit")), width = structure(1, unit = 0L, class = c("simpleUnit", 
         "unit")), height = structure(1, unit = 0L, class = c("simpleUnit", "unit")), 
             justification = "centre", gp = structure(list(fontsize = 15, col = c("#619CFF", 
             "#619CFF", "#619CFF", "#00BA38", "#00BA38", "#F8766D", "#F8766D", "#F8766D"
             ), fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
             clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = structure(list(
                 nrow = 1L, ncol = 3L, widths = structure(list(2.2, list(1, structure(list(
                     list(1, structure(list(label = c("(I): 1.27", "(H): 0.84", "(J): 0.67", 
                     "(G): 0.14", "(A): -0.05", "(D): -0.83", "(F): -0.9", "(E): -1.15"
                     ), x = structure(c(0, 0, 0, 0, 0, 0, 0, 0), unit = 0L, class = c("simpleUnit", 
                     "unit")), y = structure(c(0.999998571432653, 0.857141836737609, 0.714285102042566, 
                     0.571428367347522, 0.428571632652478, 0.285714897957434, 0.142858163262391, 
                     1.42856734694394e-06), unit = 4L, class = c("simpleUnit", "unit")), 
                       just = "centre", hjust = 0, vjust = 0.5, rot = 0, check.overlap = FALSE, 
                       name = "GRID.text.48", gp = structure(list(fontsize = 15, col = c("#619CFF", 
                       "#619CFF", "#619CFF", "#00BA38", "#00BA38", "#F8766D", "#F8766D", 
                       "#F8766D"), fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                       vp = NULL), class = c("text", "grob", "gDesc")), 21L), list(0, 
                       NULL, 2L)), class = "unit"), 201L), 0), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
                 "unit")), respect = FALSE, valid.respect = 0L, respect.mat = structure(c(0L, 
                 0L, 0L), .Dim = c(1L, 3L)), just = "centre", valid.just = c(0.5, 0.5)), class = "layout"), 
             layout.pos.row = NULL, layout.pos.col = NULL, valid.just = c(0.5, 0.5), valid.pos.row = NULL, 
             valid.pos.col = NULL, name = "GRID.VP.4"), class = "viewport"), children = structure(list(
             structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
             )), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit")), width = structure(1, unit = 0L, class = c("simpleUnit", 
             "unit")), height = structure(1, unit = 0L, class = c("simpleUnit", "unit"
             )), justification = "centre", gp = structure(list(), class = "gpar"), clip = FALSE, 
                 xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = NULL, layout.pos.row = NULL, 
                 layout.pos.col = c(2L, 2L), valid.just = c(0.5, 0.5), valid.pos.row = NULL, 
                 valid.pos.col = c(2L, 2L), name = "GRID.VP.5"), class = "viewport")), class = c("vpList", 
         "viewport"))), class = c("vpTree", "viewport")), children = structure(list(GRID.text.48 = structure(list(
             label = c("(I): 1.27", "(H): 0.84", "(J): 0.67", "(G): 0.14", "(A): -0.05", 
             "(D): -0.83", "(F): -0.9", "(E): -1.15"), x = structure(c(0, 0, 0, 0, 0, 
             0, 0, 0), unit = 0L, class = c("simpleUnit", "unit")), y = structure(c(0.999998571432653, 
             0.857141836737609, 0.714285102042566, 0.571428367347522, 0.428571632652478, 
             0.285714897957434, 0.142858163262391, 1.42856734694394e-06), unit = 4L, class = c("simpleUnit", 
             "unit")), just = "centre", hjust = 0, vjust = 0.5, rot = 0, check.overlap = FALSE, 
             name = "GRID.text.48", gp = structure(list(fontsize = 15, col = c("#619CFF", 
             "#619CFF", "#619CFF", "#00BA38", "#00BA38", "#F8766D", "#F8766D", "#F8766D"
             ), fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
             vp = NULL), class = c("text", "grob", "gDesc"))), class = "gList"), childrenOrder = "GRID.text.48"), class = c("titleGrob", 
     "gTree", "grob", "gDesc")), 21L)), class = "unit"), 201L), list(0, NULL, 1L), list(
         0, NULL, 8L), 5.5), class = "unit"), structure(list(5.5, list(0, NULL, 1L), list(
         1, structure(list(widths = structure(list(0, list(1, structure(list(list(1, structure(list(
             label = "", x = structure(0, unit = 0L, class = c("simpleUnit", "unit")), 
             y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit")), just = "centre", 
             hjust = 0.5, vjust = 1, rot = 90, check.overlap = FALSE, name = "GRID.text.94", 
             gp = structure(list(fontsize = 11, col = "black", fontfamily = "", lineheight = 0.9, 
                 font = c(plain = 1L)), class = "gpar"), vp = NULL), class = c("text", 
         "grob", "gDesc")), 21L), list(0.0366666666666667, NULL, 2L)), class = "unit"), 
             201L), 2.75), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
         "unit")), name = "axis.title.y.left..titleGrob.96", gp = NULL, vp = structure(list(
             parent = structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
             "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit")), 
                 width = structure(1, unit = 0L, class = c("simpleUnit", "unit")), height = structure(1, unit = 0L, class = c("simpleUnit", 
                 "unit")), justification = "centre", gp = structure(list(fontsize = 11, 
                     col = "black", fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                 clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = structure(list(
                     nrow = 1L, ncol = 3L, widths = structure(list(0, list(1, structure(list(
                       list(1, structure(list(label = "", x = structure(0, unit = 0L, class = c("simpleUnit", 
                       "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", 
                       "unit")), just = "centre", hjust = 0.5, vjust = 1, rot = 90, check.overlap = FALSE, 
                         name = "GRID.text.94", gp = structure(list(fontsize = 11, col = "black", 
                           fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                         vp = NULL), class = c("text", "grob", "gDesc")), 21L), list(0.0366666666666667, 
                         NULL, 2L)), class = "unit"), 201L), 2.75), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
                     "unit")), respect = FALSE, valid.respect = 0L, respect.mat = structure(c(0L, 
                     0L, 0L), .Dim = c(1L, 3L)), just = "centre", valid.just = c(0.5, 
                     0.5)), class = "layout"), layout.pos.row = NULL, layout.pos.col = NULL, 
                 valid.just = c(0.5, 0.5), valid.pos.row = NULL, valid.pos.col = NULL, 
                 name = "GRID.VP.21"), class = "viewport"), children = structure(list(
                 structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
                 "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
                 )), width = structure(1, unit = 0L, class = c("simpleUnit", "unit")), 
                     height = structure(1, unit = 0L, class = c("simpleUnit", "unit")), 
                     justification = "centre", gp = structure(list(), class = "gpar"), 
                     clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = NULL, 
                     layout.pos.row = NULL, layout.pos.col = c(2L, 2L), valid.just = c(0.5, 
                     0.5), valid.pos.row = NULL, valid.pos.col = c(2L, 2L), name = "GRID.VP.22"), class = "viewport")), class = c("vpList", 
             "viewport"))), class = c("vpTree", "viewport")), children = structure(list(
             GRID.text.94 = structure(list(label = "", x = structure(0, unit = 0L, class = c("simpleUnit", 
             "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit")), 
                 just = "centre", hjust = 0.5, vjust = 1, rot = 90, check.overlap = FALSE, 
                 name = "GRID.text.94", gp = structure(list(fontsize = 11, col = "black", 
                     fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                 vp = NULL), class = c("text", "grob", "gDesc"))), class = "gList"), childrenOrder = "GRID.text.94"), class = c("titleGrob", 
         "gTree", "grob", "gDesc")), 21L), list(1, structure(list(list(1, structure(list(
         widths = structure(list(0, list(1, structure(list(list(1, structure(list(label = c("8", 
         "7", "6", "5", "4", "3", "2", "1"), x = structure(c(1, 1, 1, 1, 1, 1, 1, 1), unit = 0L, class = c("simpleUnit", 
         "unit")), y = structure(c(0.0333333333333333, 0.166666666666667, 0.3, 0.433333333333333, 
         0.566666666666667, 0.7, 0.833333333333333, 0.966666666666667), unit = 4L, class = c("simpleUnit", 
         "unit")), just = "centre", hjust = 1, vjust = 0.5, rot = 0, check.overlap = FALSE, 
             name = "GRID.text.85", gp = structure(list(fontsize = 12, col = "grey30", 
                 fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
             vp = NULL), class = c("text", "grob", "gDesc")), 21L), list(0, NULL, 2L)), class = "unit"), 
             201L), 2.2), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
         "unit")), name = "axis.text.y.left..titleGrob.87", gp = NULL, vp = structure(list(
             parent = structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
             "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit")), 
                 width = structure(1, unit = 0L, class = c("simpleUnit", "unit")), height = structure(1, unit = 0L, class = c("simpleUnit", 
                 "unit")), justification = "centre", gp = structure(list(fontsize = 12, 
                     col = "grey30", fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                 clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = structure(list(
                     nrow = 1L, ncol = 3L, widths = structure(list(0, list(1, structure(list(
                       list(1, structure(list(label = c("8", "7", "6", "5", "4", "3", 
                       "2", "1"), x = structure(c(1, 1, 1, 1, 1, 1, 1, 1), unit = 0L, class = c("simpleUnit", 
                       "unit")), y = structure(c(0.0333333333333333, 0.166666666666667, 
                       0.3, 0.433333333333333, 0.566666666666667, 0.7, 0.833333333333333, 
                       0.966666666666667), unit = 4L, class = c("simpleUnit", "unit")), 
                         just = "centre", hjust = 1, vjust = 0.5, rot = 0, check.overlap = FALSE, 
                         name = "GRID.text.85", gp = structure(list(fontsize = 12, col = "grey30", 
                           fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                         vp = NULL), class = c("text", "grob", "gDesc")), 21L), list(0, 
                         NULL, 2L)), class = "unit"), 201L), 2.2), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
                     "unit")), respect = FALSE, valid.respect = 0L, respect.mat = structure(c(0L, 
                     0L, 0L), .Dim = c(1L, 3L)), just = "centre", valid.just = c(0.5, 
                     0.5)), class = "layout"), layout.pos.row = NULL, layout.pos.col = NULL, 
                 valid.just = c(0.5, 0.5), valid.pos.row = NULL, valid.pos.col = NULL, 
                 name = "GRID.VP.16"), class = "viewport"), children = structure(list(
                 structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
                 "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
                 )), width = structure(1, unit = 0L, class = c("simpleUnit", "unit")), 
                     height = structure(1, unit = 0L, class = c("simpleUnit", "unit")), 
                     justification = "centre", gp = structure(list(), class = "gpar"), 
                     clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = NULL, 
                     layout.pos.row = NULL, layout.pos.col = c(2L, 2L), valid.just = c(0.5, 
                     0.5), valid.pos.row = NULL, valid.pos.col = c(2L, 2L), name = "GRID.VP.17"), class = "viewport")), class = c("vpList", 
             "viewport"))), class = c("vpTree", "viewport")), children = structure(list(
             GRID.text.85 = structure(list(label = c("8", "7", "6", "5", "4", "3", "2", 
             "1"), x = structure(c(1, 1, 1, 1, 1, 1, 1, 1), unit = 0L, class = c("simpleUnit", 
             "unit")), y = structure(c(0.0333333333333333, 0.166666666666667, 0.3, 0.433333333333333, 
             0.566666666666667, 0.7, 0.833333333333333, 0.966666666666667), unit = 4L, class = c("simpleUnit", 
             "unit")), just = "centre", hjust = 1, vjust = 0.5, rot = 0, check.overlap = FALSE, 
                 name = "GRID.text.85", gp = structure(list(fontsize = 12, col = "grey30", 
                     fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                 vp = NULL), class = c("text", "grob", "gDesc"))), class = "gList"), childrenOrder = "GRID.text.85"), class = c("titleGrob", 
     "gTree", "grob", "gDesc")), 21L), list(2.75, NULL, 8L)), class = "unit"), 201L), 
         list(1, NULL, 5L), list(0, NULL, 1L), list(0, NULL, 1L), list(0, NULL, 8L), 5.5), class = "unit"), 
         structure(list(5.5, list(0, NULL, 1L), list(0, NULL, 1L), list(0, NULL, 1L), 
             list(1, NULL, 5L), list(1, structure(list(list(2.75, NULL, 8L), list(1, structure(list(
                 widths = structure(list(2.2, list(1, structure(list(list(1, structure(list(
                     label = c("125", "119"), x = structure(c(0, 0), unit = 0L, class = c("simpleUnit", 
                     "unit")), y = structure(c(0.970647605971797, 0.387236322408633), unit = 4L, class = c("simpleUnit", 
                     "unit")), just = "centre", hjust = 0, vjust = 0.5, rot = 0, check.overlap = FALSE, 
                     name = "GRID.text.132", gp = structure(list(fontsize = 15, col = "grey30", 
                       fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                     vp = NULL), class = c("text", "grob", "gDesc")), 21L), list(0, NULL, 
                     2L)), class = "unit"), 201L), 0), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
                 "unit")), name = "axis.text.y.right..titleGrob.134", gp = NULL, vp = structure(list(
                     parent = structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
                     "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
                     )), width = structure(1, unit = 0L, class = c("simpleUnit", "unit"
                     )), height = structure(1, unit = 0L, class = c("simpleUnit", "unit"
                     )), justification = "centre", gp = structure(list(fontsize = 15, 
                       col = "grey30", fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                       clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = structure(list(
                         nrow = 1L, ncol = 3L, widths = structure(list(2.2, list(1, structure(list(
                           list(1, structure(list(label = c("125", "119"), x = structure(c(0, 
                           0), unit = 0L, class = c("simpleUnit", "unit")), y = structure(c(0.970647605971797, 
                           0.387236322408633), unit = 4L, class = c("simpleUnit", "unit"
                           )), just = "centre", hjust = 0, vjust = 0.5, rot = 0, check.overlap = FALSE, 
                             name = "GRID.text.132", gp = structure(list(fontsize = 15, 
                               col = "grey30", fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                             vp = NULL), class = c("text", "grob", "gDesc")), 21L), list(
                             0, NULL, 2L)), class = "unit"), 201L), 0), class = "unit"), 
                         heights = structure(1, unit = 5L, class = c("simpleUnit", "unit"
                         )), respect = FALSE, valid.respect = 0L, respect.mat = structure(c(0L, 
                         0L, 0L), .Dim = c(1L, 3L)), just = "centre", valid.just = c(0.5, 
                         0.5)), class = "layout"), layout.pos.row = NULL, layout.pos.col = NULL, 
                       valid.just = c(0.5, 0.5), valid.pos.row = NULL, valid.pos.col = NULL, 
                       name = "GRID.VP.28"), class = "viewport"), children = structure(list(
                       structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
                       "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", 
                       "unit")), width = structure(1, unit = 0L, class = c("simpleUnit", 
                       "unit")), height = structure(1, unit = 0L, class = c("simpleUnit", 
                       "unit")), justification = "centre", gp = structure(list(), class = "gpar"), 
                         clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, 
                         layout = NULL, layout.pos.row = NULL, layout.pos.col = c(2L, 
                         2L), valid.just = c(0.5, 0.5), valid.pos.row = NULL, valid.pos.col = c(2L, 
                         2L), name = "GRID.VP.29"), class = "viewport")), class = c("vpList", 
                     "viewport"))), class = c("vpTree", "viewport")), children = structure(list(
                     GRID.text.132 = structure(list(label = c("125", "119"), x = structure(c(0, 
                     0), unit = 0L, class = c("simpleUnit", "unit")), y = structure(c(0.970647605971797, 
                     0.387236322408633), unit = 4L, class = c("simpleUnit", "unit")), 
                       just = "centre", hjust = 0, vjust = 0.5, rot = 0, check.overlap = FALSE, 
                       name = "GRID.text.132", gp = structure(list(fontsize = 15, col = "grey30", 
                         fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                       vp = NULL), class = c("text", "grob", "gDesc"))), class = "gList"), 
                 childrenOrder = "GRID.text.132"), class = c("titleGrob", "gTree", "grob", 
             "gDesc")), 21L)), class = "unit"), 201L), list(1, structure(list(widths = structure(list(
                 2.75, list(1, structure(list(list(1, structure(list(label = "", x = structure(0, unit = 0L, class = c("simpleUnit", 
                 "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
                 )), just = "centre", hjust = 0.5, vjust = 0, rot = -90, check.overlap = FALSE, 
                     name = "GRID.text.139", gp = structure(list(fontsize = 11, col = "black", 
                       fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                     vp = NULL), class = c("text", "grob", "gDesc")), 21L), list(0.0366666666666667, 
                     NULL, 2L)), class = "unit"), 201L), 0), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
             "unit")), name = "axis.title.y.right..titleGrob.141", gp = NULL, vp = structure(list(
                 parent = structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
                 "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
                 )), width = structure(1, unit = 0L, class = c("simpleUnit", "unit")), 
                     height = structure(1, unit = 0L, class = c("simpleUnit", "unit")), 
                     justification = "centre", gp = structure(list(fontsize = 11, col = "black", 
                       fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                     clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = structure(list(
                       nrow = 1L, ncol = 3L, widths = structure(list(2.75, list(1, structure(list(
                         list(1, structure(list(label = "", x = structure(0, unit = 0L, class = c("simpleUnit", 
                         "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", 
                         "unit")), just = "centre", hjust = 0.5, vjust = 0, rot = -90, 
                           check.overlap = FALSE, name = "GRID.text.139", gp = structure(list(
                             fontsize = 11, col = "black", fontfamily = "", lineheight = 0.9, 
                             font = c(plain = 1L)), class = "gpar"), vp = NULL), class = c("text", 
                         "grob", "gDesc")), 21L), list(0.0366666666666667, NULL, 2L)), class = "unit"), 
                         201L), 0), class = "unit"), heights = structure(1, unit = 5L, class = c("simpleUnit", 
                       "unit")), respect = FALSE, valid.respect = 0L, respect.mat = structure(c(0L, 
                       0L, 0L), .Dim = c(1L, 3L)), just = "centre", valid.just = c(0.5, 
                       0.5)), class = "layout"), layout.pos.row = NULL, layout.pos.col = NULL, 
                     valid.just = c(0.5, 0.5), valid.pos.row = NULL, valid.pos.col = NULL, 
                     name = "GRID.VP.31"), class = "viewport"), children = structure(list(
                     structure(list(x = structure(0.5, unit = 0L, class = c("simpleUnit", 
                     "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
                     )), width = structure(1, unit = 0L, class = c("simpleUnit", "unit"
                     )), height = structure(1, unit = 0L, class = c("simpleUnit", "unit"
                     )), justification = "centre", gp = structure(list(), class = "gpar"), 
                       clip = FALSE, xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = NULL, 
                       layout.pos.row = NULL, layout.pos.col = c(2L, 2L), valid.just = c(0.5, 
                       0.5), valid.pos.row = NULL, valid.pos.col = c(2L, 2L), name = "GRID.VP.32"), class = "viewport")), class = c("vpList", 
                 "viewport"))), class = c("vpTree", "viewport")), children = structure(list(
                 GRID.text.139 = structure(list(label = "", x = structure(0, unit = 0L, class = c("simpleUnit", 
                 "unit")), y = structure(0.5, unit = 0L, class = c("simpleUnit", "unit"
                 )), just = "centre", hjust = 0.5, vjust = 0, rot = -90, check.overlap = FALSE, 
                     name = "GRID.text.139", gp = structure(list(fontsize = 11, col = "black", 
                       fontfamily = "", lineheight = 0.9, font = c(plain = 1L)), class = "gpar"), 
                     vp = NULL), class = c("text", "grob", "gDesc"))), class = "gList"), 
                 childrenOrder = "GRID.text.139"), class = c("titleGrob", "gTree", "grob", 
             "gDesc")), 21L), list(0, NULL, 8L), 5.5), class = "unit"), structure(list(
             0, list(0, NULL, 1L), list(0, NULL, 1L), list(1, structure(list(list(0, NULL, 
                 1L), list(0, NULL, 8L)), class = "unit"), 201L), list(1, NULL, 5L), list(
                 0, NULL, 1L), list(0, NULL, 1L), list(0, NULL, 8L), 0), class = "unit"))
  13: pSummary(..., op = "max")
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 18 SKIPPED: 0 FAILED: 1
  1. Error: Output format (@testvisualizations.R#14) 
  
  Error: testthat unit tests failed
  Execution halted