Running ‘testthat.R’ [58s/63s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # This is necessary because some tests fail otherwise; see https://github.com/hadley/testthat/issues/144
  > Sys.setenv("R_TESTS" = "")
  > 
  > library(testthat)
  > library(tidybayes)
  NOTE: As of tidybayes version 1.0, several functions, arguments, and output column names
        have undergone significant name changes in order to adopt a unified naming scheme.
        See help('tidybayes-deprecated') for more information.
  
  > 
  > test_check("tidybayes")
  ── 1. Error: one-parameter eye plots work (@test.geom_eye.R#19)  ───────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("one-parameter horizontal eye", p + geom_eyeh()) at testthat/test.geom_eye.R:19
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: grid.draw(gtable)
  8: grid.draw.gTree(gtable)
  9: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  10: drawGTree(x)
  11: preDraw(x)
  12: preDraw.gTree(x)
  13: pushvpgp(x)
  14: pushgrobvp(x$vp)
  15: pushgrobvp.viewport(x$vp)
  16: pushViewport(vp, recording = FALSE)
  17: lapply(vps, push.vp, recording)
  18: FUN(X[[i]], ...)
  19: push.vp.viewport(X[[i]], ...)
  20: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 2. Error: two-parameter eye plots work (@test.geom_eye.R#44)  ───────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("two-parameter (factor) horizontal eye", p + geom_eyeh(relative_scale = 0.5)) at testthat/test.geom_eye.R:44
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: grid.draw(gtable)
  8: grid.draw.gTree(gtable)
  9: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  10: drawGTree(x)
  11: preDraw(x)
  12: preDraw.gTree(x)
  13: pushvpgp(x)
  14: pushgrobvp(x$vp)
  15: pushgrobvp.viewport(x$vp)
  16: pushViewport(vp, recording = FALSE)
  17: lapply(vps, push.vp, recording)
  18: FUN(X[[i]], ...)
  19: push.vp.viewport(X[[i]], ...)
  20: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 3. Error: horizontal grouped intervals work (@test.geom_interval.R#29)  ─────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("grouped intervals (h)", forward_plot) at testthat/test.geom_interval.R:29
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: ggplot_gtable(data)
  8: ggplot_gtable.ggplot_built(data)
  9: build_guides(plot$scales, plot$layers, plot$mapping, position, theme, plot$guides, 
         plot$labels)
  10: guides_gengrob(gdefs, theme)
  ...
  22: pushvpgp(x)
  23: pushgrobvp(x$vp)
  24: pushgrobvp.viewport(x$vp)
  25: pushViewport(vp, recording = FALSE)
  26: lapply(vps, push.vp, recording)
  27: FUN(X[[i]], ...)
  28: push.vp.vpTree(X[[i]], ...)
  29: push.vp(vp$parent, recording)
  30: push.vp.viewport(vp$parent, recording)
  31: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 4. Error: grouped intervals work (@test.geom_interval.R#71)  ────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("grouped intervals", forward_plot) at testthat/test.geom_interval.R:71
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: ggplot_gtable(data)
  8: ggplot_gtable.ggplot_built(data)
  9: build_guides(plot$scales, plot$layers, plot$mapping, position, theme, plot$guides, 
         plot$labels)
  10: guides_gengrob(gdefs, theme)
  ...
  22: pushvpgp(x)
  23: pushgrobvp(x$vp)
  24: pushgrobvp.viewport(x$vp)
  25: pushViewport(vp, recording = FALSE)
  26: lapply(vps, push.vp, recording)
  27: FUN(X[[i]], ...)
  28: push.vp.vpTree(X[[i]], ...)
  29: push.vp(vp$parent, recording)
  30: push.vp.viewport(vp$parent, recording)
  31: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 5. Error: one-group stat_lineribbons work (@test.geom_lineribbon.R#31)  ─────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("one-group stat_lineribbon", p + stat_lineribbon(.width = c(0.5, 
         0.75, 0.9)) + scale_fill_brewer()) at testthat/test.geom_lineribbon.R:31
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: ggplot_gtable(data)
  8: ggplot_gtable.ggplot_built(data)
  9: build_guides(plot$scales, plot$layers, plot$mapping, position, theme, plot$guides, 
         plot$labels)
  10: guides_gengrob(gdefs, theme)
  ...
  22: pushvpgp(x)
  23: pushgrobvp(x$vp)
  24: pushgrobvp.viewport(x$vp)
  25: pushViewport(vp, recording = FALSE)
  26: lapply(vps, push.vp, recording)
  27: FUN(X[[i]], ...)
  28: push.vp.vpTree(X[[i]], ...)
  29: push.vp(vp$parent, recording)
  30: push.vp.viewport(vp$parent, recording)
  31: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 6. Error: one-group geom_lineribbons work (@test.geom_lineribbon.R#44)  ─────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("one-group geom_lineribbon", df %>% group_by(x, g) %>% 
         mode_qi(y, .width = c(0.5, 0.75, 0.9)) %>% ggplot(aes(x = x, y = y)) + geom_lineribbon() + 
         scale_fill_brewer()) at testthat/test.geom_lineribbon.R:44
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: ggplot_gtable(data)
  8: ggplot_gtable.ggplot_built(data)
  9: build_guides(plot$scales, plot$layers, plot$mapping, position, theme, plot$guides, 
         plot$labels)
  10: guides_gengrob(gdefs, theme)
  ...
  22: pushvpgp(x)
  23: pushgrobvp(x$vp)
  24: pushgrobvp.viewport(x$vp)
  25: pushViewport(vp, recording = FALSE)
  26: lapply(vps, push.vp, recording)
  27: FUN(X[[i]], ...)
  28: push.vp.vpTree(X[[i]], ...)
  29: push.vp(vp$parent, recording)
  30: push.vp.viewport(vp$parent, recording)
  31: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 7. Error: two-group stat_lineribbons work (@test.geom_lineribbon.R#72)  ─────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("two-group stat_lineribbons grouped by group", p + stat_lineribbon(aes(group = g), 
         .width = c(0.5, 0.75, 0.9)) + scale_fill_brewer()) at testthat/test.geom_lineribbon.R:72
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: ggplot_gtable(data)
  8: ggplot_gtable.ggplot_built(data)
  9: build_guides(plot$scales, plot$layers, plot$mapping, position, theme, plot$guides, 
         plot$labels)
  10: guides_gengrob(gdefs, theme)
  ...
  22: pushvpgp(x)
  23: pushgrobvp(x$vp)
  24: pushgrobvp.viewport(x$vp)
  25: pushViewport(vp, recording = FALSE)
  26: lapply(vps, push.vp, recording)
  27: FUN(X[[i]], ...)
  28: push.vp.vpTree(X[[i]], ...)
  29: push.vp(vp$parent, recording)
  30: push.vp.viewport(vp$parent, recording)
  31: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 8. Error: horizontal grouped pointintervals work (@test.geom_pointinterval.R#
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("grouped pointintervals (h)", forward_plot) at testthat/test.geom_pointinterval.R:27
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: grid.draw(gtable)
  8: grid.draw.gTree(gtable)
  9: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  10: drawGTree(x)
  11: preDraw(x)
  12: preDraw.gTree(x)
  13: pushvpgp(x)
  14: pushgrobvp(x$vp)
  15: pushgrobvp.viewport(x$vp)
  16: pushViewport(vp, recording = FALSE)
  17: lapply(vps, push.vp, recording)
  18: FUN(X[[i]], ...)
  19: push.vp.viewport(X[[i]], ...)
  20: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 9. Error: grouped pointintervals work (@test.geom_pointinterval.R#64)  ──────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: vdiffr::expect_doppelganger("grouped pointintervals", forward_plot) at testthat/test.geom_pointinterval.R:64
  2: writer(fig, testcase, title)
  3: print_plot(plot, title)
  4: print_plot.ggplot(plot, title)
  5: print(p)
  6: print.ggplot(p)
  7: grid.draw(gtable)
  8: grid.draw.gTree(gtable)
  9: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  10: drawGTree(x)
  11: preDraw(x)
  12: preDraw.gTree(x)
  13: pushvpgp(x)
  14: pushgrobvp(x$vp)
  15: pushgrobvp.viewport(x$vp)
  16: pushViewport(vp, recording = FALSE)
  17: lapply(vps, push.vp, recording)
  18: FUN(X[[i]], ...)
  19: push.vp.viewport(X[[i]], ...)
  20: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 226 SKIPPED: 0 FAILED: 9
  1. Error: one-parameter eye plots work (@test.geom_eye.R#19) 
  2. Error: two-parameter eye plots work (@test.geom_eye.R#44) 
  3. Error: horizontal grouped intervals work (@test.geom_interval.R#29) 
  4. Error: grouped intervals work (@test.geom_interval.R#71) 
  5. Error: one-group stat_lineribbons work (@test.geom_lineribbon.R#31) 
  6. Error: one-group geom_lineribbons work (@test.geom_lineribbon.R#44) 
  7. Error: two-group stat_lineribbons work (@test.geom_lineribbon.R#72) 
  8. Error: horizontal grouped pointintervals work (@test.geom_pointinterval.R#27) 
  9. Error: grouped pointintervals work (@test.geom_pointinterval.R#64) 
  
  Error: testthat unit tests failed
  Execution halted