Running ‘testthat.R’ [6s/8s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(consort)
  > 
  > test_check("consort")
  [ FAIL 8 | WARN 0 | SKIP 1 | PASS 29 ]
  
  ══ Skipped tests (1) ═══════════════════════════════════════════════════════════
  • On CRAN (1): 'test-build_grviz.R:119:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-auto.R:21:3'): Auto generate ───────────────────────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• MRI not collected (n=3)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::consort_plot(...) at test-auto.R:21:3
    2. │ └─consort::add_side_box(gp_list, txt = txt, text_width = text_width)
    3. │   └─base::lapply(...)
    4. │     └─consort (local) FUN(X[[i]], ...)
    5. │       └─consort::get_coords(box)
    6. │         └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    7. │           └─grid::convertUnit(...)
    8. │             └─grid:::grid.Call(...)
    9. ├─grid (local) `<fn>`(`<textbox>`)
   10. ├─grid:::preDraw.gTree(`<textbox>`)
   11. │ └─grid:::pushvpgp(x)
   12. │   ├─grid:::pushgrobvp(x$vp)
   13. │   └─grid:::pushgrobvp.viewport(x$vp)
   14. │     └─grid::pushViewport(vp, recording = FALSE)
   15. │       └─base::lapply(vps, push.vp, recording)
   16. │         ├─grid (local) FUN(X[[i]], ...)
   17. │         └─grid:::push.vp.viewport(X[[i]], ...)
   18. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   19. └─grid (local) `<fn>`(`<text>`)
   20.   ├─grid::widthDetails(x)
   21.   └─grid:::widthDetails.text(x)
   22.     └─grid:::grid.Call(...)
  ── Error ('test-auto.R:53:3'): Allocation last node ────────────────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• Hx medication (n=48)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::consort_plot(...) at test-auto.R:53:3
    2. │ └─consort::add_side_box(gp_list, txt = txt, text_width = text_width)
    3. │   └─base::lapply(...)
    4. │     └─consort (local) FUN(X[[i]], ...)
    5. │       └─consort::get_coords(box)
    6. │         └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    7. │           └─grid::convertUnit(...)
    8. │             └─grid:::grid.Call(...)
    9. ├─grid (local) `<fn>`(`<textbox>`)
   10. ├─grid:::preDraw.gTree(`<textbox>`)
   11. │ └─grid:::pushvpgp(x)
   12. │   ├─grid:::pushgrobvp(x$vp)
   13. │   └─grid:::pushgrobvp.viewport(x$vp)
   14. │     └─grid::pushViewport(vp, recording = FALSE)
   15. │       └─base::lapply(vps, push.vp, recording)
   16. │         ├─grid (local) FUN(X[[i]], ...)
   17. │         └─grid:::push.vp.viewport(X[[i]], ...)
   18. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   19. └─grid (local) `<fn>`(`<text>`)
   20.   ├─grid::widthDetails(x)
   21.   └─grid:::widthDetails.text(x)
   22.     └─grid:::grid.Call(...)
  ── Error ('test-auto.R:78:3'): Allocation no label ─────────────────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• Hx medication (n=48)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::consort_plot(...) at test-auto.R:78:3
    2. │ └─consort::add_side_box(gp_list, txt = txt, text_width = text_width)
    3. │   └─base::lapply(...)
    4. │     └─consort (local) FUN(X[[i]], ...)
    5. │       └─consort::get_coords(box)
    6. │         └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    7. │           └─grid::convertUnit(...)
    8. │             └─grid:::grid.Call(...)
    9. ├─grid (local) `<fn>`(`<textbox>`)
   10. ├─grid:::preDraw.gTree(`<textbox>`)
   11. │ └─grid:::pushvpgp(x)
   12. │   ├─grid:::pushgrobvp(x$vp)
   13. │   └─grid:::pushgrobvp.viewport(x$vp)
   14. │     └─grid::pushViewport(vp, recording = FALSE)
   15. │       └─base::lapply(vps, push.vp, recording)
   16. │         ├─grid (local) FUN(X[[i]], ...)
   17. │         └─grid:::push.vp.viewport(X[[i]], ...)
   18. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   19. └─grid (local) `<fn>`(`<text>`)
   20.   ├─grid::widthDetails(x)
   21.   └─grid:::widthDetails.text(x)
   22.     └─grid:::grid.Call(...)
  ── Error ('test-build_grviz.R:20:3'): Check plot creation ──────────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• MRI not collected (n=3)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::add_side_box(g, txt = "Excluded (n=7):\n• MRI not collected (n=3)") at test-build_grviz.R:20:3
    2. │ └─base::lapply(...)
    3. │   └─consort (local) FUN(X[[i]], ...)
    4. │     └─consort::get_coords(box)
    5. │       └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    6. │         └─grid::convertUnit(...)
    7. │           └─grid:::grid.Call(...)
    8. ├─grid (local) `<fn>`(`<textbox>`)
    9. ├─grid:::preDraw.gTree(`<textbox>`)
   10. │ └─grid:::pushvpgp(x)
   11. │   ├─grid:::pushgrobvp(x$vp)
   12. │   └─grid:::pushgrobvp.viewport(x$vp)
   13. │     └─grid::pushViewport(vp, recording = FALSE)
   14. │       └─base::lapply(vps, push.vp, recording)
   15. │         ├─grid (local) FUN(X[[i]], ...)
   16. │         └─grid:::push.vp.viewport(X[[i]], ...)
   17. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   18. └─grid (local) `<fn>`(`<text>`)
   19.   ├─grid::widthDetails(x)
   20.   └─grid:::widthDetails.text(x)
   21.     └─grid:::grid.Call(...)
  ── Error ('test-build_grviz.R:46:3'): Missing in some nodes ────────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• MRI not collected (n=3)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::add_side_box(g, txt = "Excluded (n=7):\n• MRI not collected (n=3)") at test-build_grviz.R:46:3
    2. │ └─base::lapply(...)
    3. │   └─consort (local) FUN(X[[i]], ...)
    4. │     └─consort::get_coords(box)
    5. │       └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    6. │         └─grid::convertUnit(...)
    7. │           └─grid:::grid.Call(...)
    8. ├─grid (local) `<fn>`(`<textbox>`)
    9. ├─grid:::preDraw.gTree(`<textbox>`)
   10. │ └─grid:::pushvpgp(x)
   11. │   ├─grid:::pushgrobvp(x$vp)
   12. │   └─grid:::pushgrobvp.viewport(x$vp)
   13. │     └─grid::pushViewport(vp, recording = FALSE)
   14. │       └─base::lapply(vps, push.vp, recording)
   15. │         ├─grid (local) FUN(X[[i]], ...)
   16. │         └─grid:::push.vp.viewport(X[[i]], ...)
   17. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   18. └─grid (local) `<fn>`(`<text>`)
   19.   ├─grid::widthDetails(x)
   20.   └─grid:::widthDetails.text(x)
   21.     └─grid:::grid.Call(...)
  ── Error ('test-build_grviz.R:65:3'): End with missing ─────────────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• MRI not collected (n=3)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::add_side_box(g, txt = "Excluded (n=7):\n• MRI not collected (n=3)") at test-build_grviz.R:65:3
    2. │ └─base::lapply(...)
    3. │   └─consort (local) FUN(X[[i]], ...)
    4. │     └─consort::get_coords(box)
    5. │       └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    6. │         └─grid::convertUnit(...)
    7. │           └─grid:::grid.Call(...)
    8. ├─grid (local) `<fn>`(`<textbox>`)
    9. ├─grid:::preDraw.gTree(`<textbox>`)
   10. │ └─grid:::pushvpgp(x)
   11. │   ├─grid:::pushgrobvp(x$vp)
   12. │   └─grid:::pushgrobvp.viewport(x$vp)
   13. │     └─grid::pushViewport(vp, recording = FALSE)
   14. │       └─base::lapply(vps, push.vp, recording)
   15. │         ├─grid (local) FUN(X[[i]], ...)
   16. │         └─grid:::push.vp.viewport(X[[i]], ...)
   17. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   18. └─grid (local) `<fn>`(`<text>`)
   19.   ├─grid::widthDetails(x)
   20.   └─grid:::widthDetails.text(x)
   21.     └─grid:::grid.Call(...)
  ── Error ('test-build_grviz.R:83:3'): Split and combine ────────────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• MRI not collected (n=3)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::add_side_box(g, txt = "Excluded (n=7):\n• MRI not collected (n=3)") at test-build_grviz.R:83:3
    2. │ └─base::lapply(...)
    3. │   └─consort (local) FUN(X[[i]], ...)
    4. │     └─consort::get_coords(box)
    5. │       └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    6. │         └─grid::convertUnit(...)
    7. │           └─grid:::grid.Call(...)
    8. ├─grid (local) `<fn>`(`<textbox>`)
    9. ├─grid:::preDraw.gTree(`<textbox>`)
   10. │ └─grid:::pushvpgp(x)
   11. │   ├─grid:::pushgrobvp(x$vp)
   12. │   └─grid:::pushgrobvp.viewport(x$vp)
   13. │     └─grid::pushViewport(vp, recording = FALSE)
   14. │       └─base::lapply(vps, push.vp, recording)
   15. │         ├─grid (local) FUN(X[[i]], ...)
   16. │         └─grid:::push.vp.viewport(X[[i]], ...)
   17. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   18. └─grid (local) `<fn>`(`<text>`)
   19.   ├─grid::widthDetails(x)
   20.   └─grid:::widthDetails.text(x)
   21.     └─grid:::grid.Call(...)
  ── Error ('test-manually.R:17:3'): Generate consort manually ───────────────────
  Error in `grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y, 
      resolveHJust(x$just, x$hjust), resolveVJust(x$just, x$vjust), 
      x$rot, as.numeric(NA))`: conversion failure on '• MRI not collected (n=3)' in 'mbcsToSbcs': for •
  Backtrace:
       ▆
    1. ├─consort::add_side_box(g, txt = txt1_side) at test-manually.R:17:3
    2. │ └─base::lapply(...)
    3. │   └─consort (local) FUN(X[[i]], ...)
    4. │     └─consort::get_coords(box)
    5. │       └─grid::convertWidth(grobWidth(x), "mm", valueOnly = TRUE)
    6. │         └─grid::convertUnit(...)
    7. │           └─grid:::grid.Call(...)
    8. ├─grid (local) `<fn>`(`<textbox>`)
    9. ├─grid:::preDraw.gTree(`<textbox>`)
   10. │ └─grid:::pushvpgp(x)
   11. │   ├─grid:::pushgrobvp(x$vp)
   12. │   └─grid:::pushgrobvp.viewport(x$vp)
   13. │     └─grid::pushViewport(vp, recording = FALSE)
   14. │       └─base::lapply(vps, push.vp, recording)
   15. │         ├─grid (local) FUN(X[[i]], ...)
   16. │         └─grid:::push.vp.viewport(X[[i]], ...)
   17. │           └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   18. └─grid (local) `<fn>`(`<text>`)
   19.   ├─grid::widthDetails(x)
   20.   └─grid:::widthDetails.text(x)
   21.     └─grid:::grid.Call(...)
  
  [ FAIL 8 | WARN 0 | SKIP 1 | PASS 29 ]
  Deleting unused snapshots:
  • auto/auto-grviz.gv
  • auto/auto-last-grviz.gv
  • auto/auto-nolab-grviz.gv
  • auto/autogen-last.png
  • auto/autogen-nolab.png
  • auto/autogen.png
  • build_grviz/build-grviz.png
  • build_grviz/empty-middle-grviz.gv
  • build_grviz/end-miss-grviz.gv
  • build_grviz/end-miss-grviz.png
  • build_grviz/grviz.gv
  • build_grviz/multi-miss-grviz.gv
  • build_grviz/multi-miss-grviz.png
  • build_grviz/split-comb-grviz.gv
  • manually/manually-gen.png
  Error: Test failures
  Execution halted