Running ‘testthat.R’ [22s/39s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > pkg_name <- "teal.reporter"
  > library(pkg_name, character.only = TRUE)
  
  > testthat::test_check(pkg_name)
  
  Attaching package: 'testthat'
  
  The following object is masked from 'package:teal.reporter':
  
      Reporter
  
  Error in (function (card)  : ARTIFICIAL ERROR
  Error in (function (card, comment)  : ARTIFICIAL ERROR
  Error in (function ()  : ARTIFICIAL ERROR
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 281 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-Archiver.R:15:1'): (code run outside of `test_that()`) ─────────
  Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rtables::build_table(lyt, airquality) at test-Archiver.R:15:1
    2.   └─rtables::update_ref_indexing(tab)
    3.     ├─formatters::make_row_df(tt)
    4.     └─rtables::make_row_df(tt)
    5.       └─rtables (local) .local(...)
    6.         ├─formatters::make_row_df(...)
    7.         └─rtables::make_row_df(...)
    8.           └─rtables (local) .local(...)
    9.             ├─formatters::make_row_df(...)
   10.             └─rtables::make_row_df(...)
   11.               └─rtables (local) .local(...)
   12.                 ├─formatters::make_row_df(...)
   13.                 └─rtables::make_row_df(...)
   14.                   └─rtables (local) .local(...)
   15.                     ├─formatters::pagdfrow(...)
   16.                     │ └─base::data.frame(...)
   17.                     ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width)
   18.                     └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width)
   19.                       └─rtables (local) .local(x, colwidths, max_width)
   20.                         ├─base::unlist(...)
   21.                         └─base::mapply(...)
   22.                           └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]])
   23.                             ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)
   24.                             └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)
   25.                               ├─base::unlist(...)
   26.                               └─base::vapply(...)
   27.                                 ├─formatters (local) FUN(X[[i]], ...)
   28.                                 └─formatters (local) FUN(X[[i]], ...)
   29.                                   └─base::vapply(...)
   30.                                     └─formatters (local) FUN(X[[i]], ...)
   31.                                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   32.                                         └─formatters::open_font_dev(fontspec)
  ── Error ('test-Reporter.R:23:1'): (code run outside of `test_that()`) ─────────
  Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default
  Backtrace:
       ▆
    1. └─rtables::build_table(lyt, airquality) at test-Reporter.R:23:1
    2.   └─rtables::update_ref_indexing(tab)
    3.     ├─formatters::make_row_df(tt)
    4.     └─rtables::make_row_df(tt)
    5.       └─rtables (local) .local(...)
    6.         ├─formatters::make_row_df(...)
    7.         └─rtables::make_row_df(...)
    8.           └─rtables (local) .local(...)
    9.             ├─formatters::make_row_df(...)
   10.             └─rtables::make_row_df(...)
   11.               └─rtables (local) .local(...)
   12.                 ├─formatters::make_row_df(...)
   13.                 └─rtables::make_row_df(...)
   14.                   └─rtables (local) .local(...)
   15.                     ├─formatters::pagdfrow(...)
   16.                     │ └─base::data.frame(...)
   17.                     ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width)
   18.                     └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width)
   19.                       └─rtables (local) .local(x, colwidths, max_width)
   20.                         ├─base::unlist(...)
   21.                         └─base::mapply(...)
   22.                           └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]])
   23.                             ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)
   24.                             └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)
   25.                               ├─base::unlist(...)
   26.                               └─base::vapply(...)
   27.                                 ├─formatters (local) FUN(X[[i]], ...)
   28.                                 └─formatters (local) FUN(X[[i]], ...)
   29.                                   └─base::vapply(...)
   30.                                     └─formatters (local) FUN(X[[i]], ...)
   31.                                       └─formatters::wrap_txt(xi, max_width, fontspec = fontspec)
   32.                                         └─formatters::open_font_dev(fontspec)
  ── Failure ('test-TableBlock.R:68:3'): set_content supports rtables object ─────
  Expected `block$set_content(rtables::build_table(l, iris))` to run without any errors.
  ℹ Actually got a <simpleError> with text:
    argument "fontspec" is missing, with no default
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 281 ]
  Error: Test failures
  Execution halted