Running ‘spelling.R’ [0s/1s]
  Running ‘testthat.R’ [171s/251s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > 
  > if (requireNamespace('testthat', quietly = TRUE)) {
  +   library(testthat)
  +   library(GGally)
  + 
  +   test_check("GGally")
  + }
  Loading required package: ggplot2
  Registered S3 method overwritten by 'GGally':
    method from   
    +.gg   ggplot2
  # weights:  24 (14 variable)
  initial  value 50552.644463 
  iter  10 value 45030.930814
  iter  20 value 43102.145726
  final  value 43101.422966 
  converged
  [ FAIL 17 | WARN 21 | SKIP 3 | PASS 610 ]
  
  ══ Skipped tests (3) ═══════════════════════════════════════════════════════════
  • On CRAN (3): 'test-gg-plots.R:4:1', 'test-vig_ggally.R:2:3',
    'test-zzz_ggpairs.R:3:1'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_model(mod_simple)) at test-ggcoef_model.R:12:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_model(mod_labelled)) at test-ggcoef_model.R:31:5
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(...) at test-ggcoef_model.R:34:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(...) at test-ggcoef_model.R:43:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_model(mod_simple, facet_row = NULL, colour_guide = TRUE)) at test-ggcoef_model.R:54:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_model(mod_titanic, exponentiate = TRUE)) at test-ggcoef_model.R:67:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_model(mod_titanic, exponentiate = TRUE, intercept = TRUE)) at test-ggcoef_model.R:70:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(...) at test-ggcoef_model.R:73:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(...) at test-ggcoef_model.R:79:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(...) at test-ggcoef_model.R:85:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_model(mod_poly)) at test-ggcoef_model.R:98:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_model(mod2)) at test-ggcoef_model.R:109:5
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_compare(models)) at test-ggcoef_model.R:119:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_compare(models, type = "faceted")) at test-ggcoef_model.R:120:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_multinom(mod, exponentiate = TRUE)) at test-ggcoef_model.R:127:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_multinom(mod, type = "faceted")) at test-ggcoef_model.R:128:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  ── Failure ('test-ggcoef_model.R:6:5'): example of ggcoef_model ────────────────
  `print(x)` threw an error.
  Message: conversion failure on 'p ≤ 0.05' in 'mbcsToSbcs': for ≤
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─GGally (local) expect_print(ggcoef_multinom(mod, type = "faceted", y.level_label = c(`pretty happy` = "pretty happy\n(ref: very happy)"))) at test-ggcoef_model.R:129:3
    2. │ ├─testthat::expect_error(print(x), NA) at test-ggcoef_model.R:6:5
    3. │ │ └─testthat:::quasi_capture(...)
    4. │ │   ├─testthat (local) .capture(...)
    5. │ │   │ └─base::withCallingHandlers(...)
    6. │ │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. │ ├─base::print(x)
    8. │ └─ggplot2:::print.ggplot(x)
    9. │   ├─ggplot2::ggplot_gtable(data)
   10. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
   11. │     └─ggplot2:::build_guides(...)
   12. │       └─ggplot2:::guides_gengrob(gdefs, theme)
   13. │         └─base::lapply(gdefs, guide_gengrob, theme)
   14. │           ├─ggplot2 (local) FUN(X[[i]], ...)
   15. │           └─ggplot2:::guide_gengrob.legend(X[[i]], ...)
   16. │             └─ggplot2:::width_cm(grob.labels)
   17. │               └─base::vapply(x, width_cm, numeric(1))
   18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
   19. │                   └─grid::convertWidth(grobWidth(x), "cm", TRUE)
   20. │                     └─grid::convertUnit(...)
   21. │                       └─grid:::grid.Call(...)
   22. ├─grid (local) `<fn>`(`<titleGrb>`)
   23. ├─grid:::preDraw.gTree(`<titleGrb>`)
   24. │ └─grid:::pushvpgp(x)
   25. │   ├─grid:::pushgrobvp(x$vp)
   26. │   └─grid:::pushgrobvp.viewport(x$vp)
   27. │     └─grid::pushViewport(vp, recording = FALSE)
   28. │       └─base::lapply(vps, push.vp, recording)
   29. │         ├─grid (local) FUN(X[[i]], ...)
   30. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   31. │           ├─grid:::push.vp(vp$parent, recording)
   32. │           └─grid:::push.vp.viewport(vp$parent, recording)
   33. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   34. └─grid (local) `<fn>`(`<text>`)
   35.   ├─grid::widthDetails(x)
   36.   └─grid:::widthDetails.text(x)
   37.     └─grid:::grid.Call(...)
  
  [ FAIL 17 | WARN 21 | SKIP 3 | PASS 610 ]
  Error: Test failures
  Execution halted