Running 'testthat.R' [130s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(ggtikz)
  > 
  > test_check("ggtikz")
  [ FAIL 2 | WARN 2 | SKIP 0 | PASS 269 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-ggtikzCanvas.R:54:5'): panel axis ranges are returned correctly ──
  Error in `file(con, "r")`: cannot open the connection
  Backtrace:
       ▆
    1. ├─ggtikz (local) expect_ranges_equal(ggtikzCanvas(p), 1, 1, c(1, 1), c(6, 6)) at test-ggtikzCanvas.R:54:4
    2. │ └─ggtikz:::get_panel_range(canvas, panelx, panely) at test-ggtikzCanvas.R:38:4
    3. ├─ggtikz::ggtikzCanvas(p)
    4. │ ├─ggplot2::ggplot_gtable(built)
    5. │ └─ggplot2:::ggplot_gtable.ggplot_built(built)
    6. │   └─layout$render(geom_grobs, data, theme, plot$labels)
    7. │     └─ggplot2 (local) render(..., self = self)
    8. │       └─self$facet$draw_panels(...)
    9. │         └─ggplot2 (local) draw_panels(..., self = self)
   10. │           └─ggplot2::render_strips(...)
   11. │             └─ggplot2:::build_strip(x, labeller, theme, TRUE)
   12. │               └─ggplot2:::assemble_strips(...)
   13. │                 └─ggplot2::max_height(lapply(grobs, function(x) x$heights[2]))
   14. │                   ├─base::unlist(lapply(grobs, height_cm))
   15. │                   └─base::lapply(grobs, height_cm)
   16. │                     └─ggplot2 (local) FUN(X[[i]], ...)
   17. │                       └─grid::convertHeight(x, "cm", TRUE)
   18. │                         └─grid::convertUnit(...)
   19. │                           └─grid:::grid.Call(...)
   20. ├─grid (local) `<fn>`(`<text>`)
   21. │ ├─grid::heightDetails(x)
   22. │ └─grid:::heightDetails.text(x)
   23. │   └─grid:::grid.Call(...)
   24. └─tikzDevice (local) `<fn>`(...)
   25.   └─tikzDevice:::getMetricsFromLatex(TeXMetrics, verbose = verbose)
   26.     └─base::readLines(texLog)
   27.       └─base::file(con, "r")
  ── Error ('test-ggtikzCanvas.R:115:5'): Panel viewport names are determined correctly ──
  Error in `file(con, "r")`: cannot open the connection
  Backtrace:
       ▆
    1. ├─ggtikz (local) expect_vp_name_equal(p_wrap1, 1, 1, "panel-1-1.8-5-8-5") at test-ggtikzCanvas.R:115:4
    2. │ └─ggtikz (local) vp_from_p(p, panelx, panely) at test-ggtikzCanvas.R:106:4
    3. │   └─ggtikz::ggtikzCanvas(p) at test-ggtikzCanvas.R:101:4
    4. │     ├─ggplot2::ggplot_gtable(built)
    5. │     └─ggplot2:::ggplot_gtable.ggplot_built(built)
    6. │       └─layout$render(geom_grobs, data, theme, plot$labels)
    7. │         └─ggplot2 (local) render(..., self = self)
    8. │           └─self$facet$draw_panels(...)
    9. │             └─ggplot2 (local) draw_panels(..., self = self)
   10. │               ├─grid::unit(...)
   11. │               │ └─grid::is.unit(x)
   12. │               └─base::apply(axis_mat_x_bottom, 1, max_height, value_only = TRUE)
   13. │                 └─ggplot2 (local) FUN(newX[, i], ...)
   14. │                   ├─base::unlist(lapply(grobs, height_cm))
   15. │                   └─base::lapply(grobs, height_cm)
   16. │                     └─ggplot2 (local) FUN(X[[i]], ...)
   17. │                       └─grid::convertHeight(grobHeight(x), "cm", TRUE)
   18. │                         └─grid::convertUnit(...)
   19. │                           └─grid:::grid.Call(...)
   20. ├─grid (local) `<fn>`(`<titleGrb>`)
   21. ├─grid:::preDraw.gTree(`<titleGrb>`)
   22. │ └─grid:::pushvpgp(x)
   23. │   ├─grid:::pushgrobvp(x$vp)
   24. │   └─grid:::pushgrobvp.viewport(x$vp)
   25. │     └─grid::pushViewport(vp, recording = FALSE)
   26. │       └─base::lapply(vps, push.vp, recording)
   27. │         ├─grid (local) FUN(X[[i]], ...)
   28. │         └─grid:::push.vp.vpTree(X[[i]], ...)
   29. │           ├─grid:::push.vp(vp$parent, recording)
   30. │           └─grid:::push.vp.viewport(vp$parent, recording)
   31. │             └─grid:::grid.Call.graphics(C_setviewport, vp, TRUE)
   32. ├─grid (local) `<fn>`(`<text>`)
   33. │ ├─grid::heightDetails(x)
   34. │ └─grid:::heightDetails.text(x)
   35. │   └─grid:::grid.Call(...)
   36. └─tikzDevice (local) `<fn>`(...)
   37.   └─tikzDevice:::getMetricsFromLatex(TeXMetrics, verbose = verbose)
   38.     └─base::readLines(texLog)
   39.       └─base::file(con, "r")
  
  [ FAIL 2 | WARN 2 | SKIP 0 | PASS 269 ]
  Error: Test failures
  Execution halted