* using log directory 'd:/Rcompile/CRANpkg/local/4.4/teal.reporter.Rcheck'
* using R version 4.4.3 (2025-02-28 ucrt)
* using platform: x86_64-w64-mingw32
* R was compiled by
    gcc.exe (GCC) 13.3.0
    GNU Fortran (GCC) 13.3.0
* running under: Windows Server 2022 x64 (build 20348)
* using session charset: UTF-8
* checking for file 'teal.reporter/DESCRIPTION' ... OK
* this is package 'teal.reporter' version '0.6.0'
* package encoding: UTF-8
* checking package namespace information ... OK
* checking package dependencies ... OK
* checking if this is a source package ... OK
* checking if there is a namespace ... OK
* checking for hidden files and directories ... OK
* checking for portable file names ... OK
* checking whether package 'teal.reporter' can be installed ... OK
* checking installed package size ... OK
* checking package directory ... OK
* checking 'build' directory ... OK
* checking DESCRIPTION meta-information ... OK
* checking top-level files ... OK
* checking for left-over files ... OK
* checking index information ... OK
* checking package subdirectories ... OK
* checking code files for non-ASCII characters ... OK
* checking R files for syntax errors ... OK
* checking whether the package can be loaded ... [1s] OK
* checking whether the package can be loaded with stated dependencies ... [1s] OK
* checking whether the package can be unloaded cleanly ... [1s] OK
* checking whether the namespace can be loaded with stated dependencies ... [1s] OK
* checking whether the namespace can be unloaded cleanly ... [1s] OK
* checking loading without being on the library search path ... [1s] OK
* checking whether startup messages can be suppressed ... [1s] OK
* checking use of S3 registration ... OK
* checking dependencies in R code ... OK
* checking S3 generic/method consistency ... OK
* checking replacement functions ... OK
* checking foreign function calls ... OK
* checking R code for possible problems ... [8s] OK
* checking Rd files ... [2s] OK
* checking Rd metadata ... OK
* checking Rd cross-references ... OK
* checking for missing documentation entries ... OK
* checking for code/documentation mismatches ... OK
* checking Rd \usage sections ... OK
* checking Rd contents ... OK
* checking for unstated dependencies in examples ... OK
* checking installed files from 'inst/doc' ... OK
* checking files in 'vignettes' ... OK
* checking examples ... [9s] ERROR
Running examples in 'teal.reporter-Ex.R' failed
The error most likely occurred in:

> ### Name: Reporter
> ### Title: 'Reporter': An 'R6' class for managing reports
> ### Aliases: Reporter
> 
> ### ** Examples
> 
> ## Don't show: 
> if (require("ggplot2")) withAutoprint({ # examplesIf
+ ## End(Don't show)
+ library(ggplot2)
+ 
+ card1 <- teal_card("## Header 2 text", "A paragraph of default text")
+ card1 <- c(card1, ggplot(iris, aes(x = Petal.Length)) + geom_histogram())
+ metadata(card1, "title") <- "Card1"
+ 
+ card2 <- teal_card("Document introduction")
+ metadata(card2, "title") <- "Card2"
+ 
+ reporter <- Reporter$new()
+ reporter$append_cards(list(card1, card2))
+ ## Don't show: 
+ }) # examplesIf
Loading required package: ggplot2
> library(ggplot2)
> card1 <- teal_card("## Header 2 text", "A paragraph of default text")
> card1 <- c(card1, ggplot(iris, aes(x = Petal.Length)) + geom_histogram())
`stat_bin()` using `bins = 30`. Pick better value `binwidth`.
> metadata(card1, "title") <- "Card1"
> card2 <- teal_card("Document introduction")
> metadata(card2, "title") <- "Card2"
> reporter <- Reporter$new()
> reporter$append_cards(list(card1, card2))
> ## End(Don't show)
> ## Don't show: 
> if (require("ggplot2") && require("rtables")) withAutoprint({ # examplesIf
+ ## End(Don't show)
+ library(rtables)
+ # With the card1 from above
+ lyt <- analyze(split_rows_by(basic_table(), "Day"), "Ozone", afun = mean)
+ table_res2 <- build_table(lyt, airquality)
+ card2 <- teal_card(
+   "## Header 2 text",
+   "A paragraph of default text",
+   table_res2
+ )
+ metadata(card2, "title") <- "Card2"
+ 
+ reporter <- Reporter$new()
+ reporter$append_cards(list(card1, card2))
+ 
+ names(reporter$get_cards())
+ reporter$reorder_cards(c("Card2", "Card1"))
+ names(reporter$get_cards())
+ ## Don't show: 
+ }) # examplesIf
Loading required package: rtables
Loading required package: formatters

Attaching package: 'formatters'

The following object is masked from 'package:base':

    %||%

Loading required package: magrittr

Attaching package: 'rtables'

The following object is masked from 'package:utils':

    str

> library(rtables)
> lyt <- analyze(split_rows_by(basic_table(), "Day"), "Ozone", afun = mean)
> table_res2 <- build_table(lyt, airquality)
Split var [Day] was not character or factor. Converting to factor
Error in match.arg(round_type) : 'arg' must be of length 1
Calls: withAutoprint ... <Anonymous> -> format_rcell -> format_value -> match.arg
Execution halted
* checking for unstated dependencies in 'tests' ... OK
* checking tests ... [78s] ERROR
  Running 'testthat.R' [78s]
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
  
  Loading required package: shiny
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  Saving _problems/test-Reporter-14.R
  Saving _problems/test-Reporter-21.R
  Saving _problems/test-Reporter-77.R
  Saving _problems/test-Reporter-82.R
  Saving _problems/test-Reporter-97.R
  Saving _problems/test-Reporter-162.R
  Saving _problems/test-Reporter-169.R
  Saving _problems/test-Reporter-177.R
  Saving _problems/test-Reporter-209.R
  Saving _problems/test-Reporter-216.R
  Saving _problems/test-Reporter-225.R
  Saving _problems/test-Reporter-238.R
  Saving _problems/test-Reporter-253.R
  Saving _problems/test-Reporter-266.R
  Saving _problems/test-Reporter-277.R
  Saving _problems/test-Reporter-284.R
  Saving _problems/test-Reporter-295.R
  Saving _problems/test-Reporter-309.R
  Saving _problems/test-Reporter-316.R
  Saving _problems/test-Reporter-322.R
  Saving _problems/test-Reporter-329.R
  Saving _problems/test-Reporter-386.R
  Saving _problems/test-SimpleReporter-22.R
  Error in (function (card)  : ARTIFICIAL ERROR
  Error in (function (card, comment)  : ARTIFICIAL ERROR
  Error in (function (card)  : ARTIFICIAL ERROR
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  [WARNING] This document format requires a nonempty <title> element.
    Defaulting to 'report.knit' as the title.
    To specify a title, use 'title' in metadata or --metadata title="...".
  Saving _problems/test-utils-3.R
  Saving _problems/test-utils-10.R
  Saving _problems/test-utils-17.R
  [ FAIL 27 | WARN 1 | SKIP 6 | PASS 348 ]
  
  ══ Skipped tests (6) ═══════════════════════════════════════════════════════════
  • testing depth 3 is below current testing specification 5 (4):
    'test-PreviewerReportModule-shinytest2.R:3:5',
    'test-PreviewerReportModule-shinytest2.R:9:5',
    'test-PreviewerReportModule-shinytest2.R:16:5',
    'test-PreviewerReportModule-shinytest2.R:34:5'
  • too complicated as table contains random elements - possible to test with
    webshot (2): 'test-toHTML.R:77:5', 'test-toHTML.R:82:5'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-Reporter.R:14:3'): set_id sets the reporter id and returns reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. └─teal.reporter:::test_reporter() at test-Reporter.R:14:3
    2.   ├─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3.   └─teal.reporter:::test_card2()
    4.     └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.       └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.         └─rtables::update_ref_indexing(tab)
    7.           ├─formatters::make_row_df(tt)
    8.           └─rtables::make_row_df(tt)
    9.             └─rtables (local) .local(...)
   10.               ├─formatters::make_row_df(...)
   11.               └─rtables::make_row_df(...)
   12.                 └─rtables (local) .local(...)
   13.                   ├─formatters::make_row_df(...)
   14.                   └─rtables::make_row_df(...)
   15.                     └─rtables (local) .local(...)
   16.                       ├─formatters::make_row_df(...)
   17.                       └─rtables::make_row_df(...)
   18.                         └─rtables (local) .local(...)
   19.                           ├─formatters::pagdfrow(...)
   20.                           │ └─base::data.frame(...)
   21.                           ├─formatters::nlines(...)
   22.                           └─rtables::nlines(...)
   23.                             ├─base::as.vector(get_formatted_cells(x))
   24.                             ├─rtables::get_formatted_cells(x)
   25.                             └─rtables::get_formatted_cells(x)
   26.                               ├─base::matrix(...)
   27.                               ├─base::unlist(...)
   28.                               └─base::Map(...)
   29.                                 └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                   └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                     └─rtables::format_rcell(...)
   32.                                       └─formatters::format_value(...)
   33.                                         └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:21:3'): Reporter with ReportCard ────────────────────
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. └─teal.reporter:::test_card2.ReportCard() at test-Reporter.R:21:3
    2.   └─teal.reporter:::test_card2(card) at ./helper-Reporter.R:42:3
    3.     └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    4.       └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    5.         └─rtables::update_ref_indexing(tab)
    6.           ├─formatters::make_row_df(tt)
    7.           └─rtables::make_row_df(tt)
    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::make_row_df(...)
   16.                       └─rtables::make_row_df(...)
   17.                         └─rtables (local) .local(...)
   18.                           ├─formatters::pagdfrow(...)
   19.                           │ └─base::data.frame(...)
   20.                           ├─formatters::nlines(...)
   21.                           └─rtables::nlines(...)
   22.                             ├─base::as.vector(get_formatted_cells(x))
   23.                             ├─rtables::get_formatted_cells(x)
   24.                             └─rtables::get_formatted_cells(x)
   25.                               ├─base::matrix(...)
   26.                               ├─base::unlist(...)
   27.                               └─base::Map(...)
   28.                                 └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   29.                                   └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   30.                                     └─rtables::format_rcell(...)
   31.                                       └─formatters::format_value(...)
   32.                                         └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:77:3'): get_cards returns the same cards which was added to reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(card1 <- test_card1(), card2 <- test_card2()) at test-Reporter.R:77:3
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:82:3'): get_blocks returns the same blocks which was added to reporter, sep = NULL ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(...) at test-Reporter.R:82:3
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2("Another title")
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:97:3'): get_blocks by default adds 'newpage' between cards ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. └─teal.reporter:::test_card2("Another title") at test-Reporter.R:97:3
    2.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    3.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    4.       └─rtables::update_ref_indexing(tab)
    5.         ├─formatters::make_row_df(tt)
    6.         └─rtables::make_row_df(tt)
    7.           └─rtables (local) .local(...)
    8.             ├─formatters::make_row_df(...)
    9.             └─rtables::make_row_df(...)
   10.               └─rtables (local) .local(...)
   11.                 ├─formatters::make_row_df(...)
   12.                 └─rtables::make_row_df(...)
   13.                   └─rtables (local) .local(...)
   14.                     ├─formatters::make_row_df(...)
   15.                     └─rtables::make_row_df(...)
   16.                       └─rtables (local) .local(...)
   17.                         ├─formatters::pagdfrow(...)
   18.                         │ └─base::data.frame(...)
   19.                         ├─formatters::nlines(...)
   20.                         └─rtables::nlines(...)
   21.                           ├─base::as.vector(get_formatted_cells(x))
   22.                           ├─rtables::get_formatted_cells(x)
   23.                           └─rtables::get_formatted_cells(x)
   24.                             ├─base::matrix(...)
   25.                             ├─base::unlist(...)
   26.                             └─base::Map(...)
   27.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   28.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   29.                                   └─rtables::format_rcell(...)
   30.                                     └─formatters::format_value(...)
   31.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:162:3'): from_reporter returns identical/equal object from the same reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(card1 <- test_card1(), card2 <- test_card2()) at test-Reporter.R:162:3
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:169:3'): from_reporter does not return identical/equal object form other reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(card1 <- test_card1(), card2 <- test_card2()) at test-Reporter.R:169:3
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:177:3'): from_reporter persists the cards structure ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(card1 <- test_card1(), card2 <- test_card2()) at test-Reporter.R:177:3
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:209:5'): from_reporter / from_reporter returns identical/equal object from the same reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. └─teal.reporter:::test_reporter() at test-Reporter.R:209:5
    2.   ├─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3.   └─teal.reporter:::test_card2()
    4.     └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.       └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.         └─rtables::update_ref_indexing(tab)
    7.           ├─formatters::make_row_df(tt)
    8.           └─rtables::make_row_df(tt)
    9.             └─rtables (local) .local(...)
   10.               ├─formatters::make_row_df(...)
   11.               └─rtables::make_row_df(...)
   12.                 └─rtables (local) .local(...)
   13.                   ├─formatters::make_row_df(...)
   14.                   └─rtables::make_row_df(...)
   15.                     └─rtables (local) .local(...)
   16.                       ├─formatters::make_row_df(...)
   17.                       └─rtables::make_row_df(...)
   18.                         └─rtables (local) .local(...)
   19.                           ├─formatters::pagdfrow(...)
   20.                           │ └─base::data.frame(...)
   21.                           ├─formatters::nlines(...)
   22.                           └─rtables::nlines(...)
   23.                             ├─base::as.vector(get_formatted_cells(x))
   24.                             ├─rtables::get_formatted_cells(x)
   25.                             └─rtables::get_formatted_cells(x)
   26.                               ├─base::matrix(...)
   27.                               ├─base::unlist(...)
   28.                               └─base::Map(...)
   29.                                 └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                   └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                     └─rtables::format_rcell(...)
   32.                                       └─formatters::format_value(...)
   33.                                         └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:216:5'): from_reporter / from_reporter does not return identical/equal object form other reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:216:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:225:5'): from_reporter / from_reporter persists the cards structure, but not the name ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:225:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:238:5'): to_list / require the existing directory path ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:238:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:253:5'): to_list / to_list and from_list could be used to save and retrieve a Reporter card ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:253:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:266:5'): to_list / to_list and from_list could be used to save and retrieve a Reporter blocks ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:266:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:277:5'): from_reporter / returns same object from the same reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(card1 <- test_card1(), card2 <- test_card2()) at test-Reporter.R:277:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:284:5'): from_reporter / returns different object if id has already been set ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:284:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:295:5'): from_reporter / from_reporter persists the cards structure ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:295:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:309:5'): to_jsondir / to_jsondir require the existing directory path ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:309:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:316:5'): to_jsondir / to_jsondir returns the same dir it was provided to it ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:316:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:322:5'): to_jsondir / from_jsondir returns identical/equal object ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:322:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:329:5'): to_jsondir / to_jsondir and from_jsondir could be used to save and retrive a Reporter ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter:::test_reporter(test_card1(), test_card2()) at test-Reporter.R:329:5
    2. │ └─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    3. └─teal.reporter:::test_card2()
    4.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    5.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    6.       └─rtables::update_ref_indexing(tab)
    7.         ├─formatters::make_row_df(tt)
    8.         └─rtables::make_row_df(tt)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::make_row_df(...)
   11.             └─rtables::make_row_df(...)
   12.               └─rtables (local) .local(...)
   13.                 ├─formatters::make_row_df(...)
   14.                 └─rtables::make_row_df(...)
   15.                   └─rtables (local) .local(...)
   16.                     ├─formatters::make_row_df(...)
   17.                     └─rtables::make_row_df(...)
   18.                       └─rtables (local) .local(...)
   19.                         ├─formatters::pagdfrow(...)
   20.                         │ └─base::data.frame(...)
   21.                         ├─formatters::nlines(...)
   22.                         └─rtables::nlines(...)
   23.                           ├─base::as.vector(get_formatted_cells(x))
   24.                           ├─rtables::get_formatted_cells(x)
   25.                           └─rtables::get_formatted_cells(x)
   26.                             ├─base::matrix(...)
   27.                             ├─base::unlist(...)
   28.                             └─base::Map(...)
   29.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   30.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   31.                                   └─rtables::format_rcell(...)
   32.                                     └─formatters::format_value(...)
   33.                                       └─base::match.arg(round_type)
  ── Error ('test-Reporter.R:386:3'): from_reporter persists the cards structure ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. └─teal.reporter:::test_card2("Another title") at test-Reporter.R:386:3
    2.   └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    3.     └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    4.       └─rtables::update_ref_indexing(tab)
    5.         ├─formatters::make_row_df(tt)
    6.         └─rtables::make_row_df(tt)
    7.           └─rtables (local) .local(...)
    8.             ├─formatters::make_row_df(...)
    9.             └─rtables::make_row_df(...)
   10.               └─rtables (local) .local(...)
   11.                 ├─formatters::make_row_df(...)
   12.                 └─rtables::make_row_df(...)
   13.                   └─rtables (local) .local(...)
   14.                     ├─formatters::make_row_df(...)
   15.                     └─rtables::make_row_df(...)
   16.                       └─rtables (local) .local(...)
   17.                         ├─formatters::pagdfrow(...)
   18.                         │ └─base::data.frame(...)
   19.                         ├─formatters::nlines(...)
   20.                         └─rtables::nlines(...)
   21.                           ├─base::as.vector(get_formatted_cells(x))
   22.                           ├─rtables::get_formatted_cells(x)
   23.                           └─rtables::get_formatted_cells(x)
   24.                             ├─base::matrix(...)
   25.                             ├─base::unlist(...)
   26.                             └─base::Map(...)
   27.                               └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   28.                                 └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   29.                                   └─rtables::format_rcell(...)
   30.                                     └─formatters::format_value(...)
   31.                                       └─base::match.arg(round_type)
  ── Error ('test-SimpleReporter.R:2:3'): simple_reporter_srv - render and downlaod  a document ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-SimpleReporter.R:2:3
    2. │ └─"id" %in% names(args)
    3. └─teal.reporter:::test_reporter()
    4.   ├─base::append(list(card1, card2), list(...)) at ./helper-Reporter.R:62:3
    5.   └─teal.reporter:::test_card2()
    6.     └─teal.reporter (local) fun(card) at ./helper-Reporter.R:25:5
    7.       └─rtables::build_table(lyt, within(airquality, Day <- factor(Day))) at ./helper-Reporter.R:17:5
    8.         └─rtables::update_ref_indexing(tab)
    9.           ├─formatters::make_row_df(tt)
   10.           └─rtables::make_row_df(tt)
   11.             └─rtables (local) .local(...)
   12.               ├─formatters::make_row_df(...)
   13.               └─rtables::make_row_df(...)
   14.                 └─rtables (local) .local(...)
   15.                   ├─formatters::make_row_df(...)
   16.                   └─rtables::make_row_df(...)
   17.                     └─rtables (local) .local(...)
   18.                       ├─formatters::make_row_df(...)
   19.                       └─rtables::make_row_df(...)
   20.                         └─rtables (local) .local(...)
   21.                           ├─formatters::pagdfrow(...)
   22.                           │ └─base::data.frame(...)
   23.                           ├─formatters::nlines(...)
   24.                           └─rtables::nlines(...)
   25.                             ├─base::as.vector(get_formatted_cells(x))
   26.                             ├─rtables::get_formatted_cells(x)
   27.                             └─rtables::get_formatted_cells(x)
   28.                               ├─base::matrix(...)
   29.                               ├─base::unlist(...)
   30.                               └─base::Map(...)
   31.                                 └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   32.                                   └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   33.                                     └─rtables::format_rcell(...)
   34.                                       └─formatters::format_value(...)
   35.                                         └─base::match.arg(round_type)
  ── Error ('test-to_rmd.R:78:5'): to_rmd generating blocks with rds auxiliary files / data frames are converted to code chunks with readRDS ──
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─teal.reporter (local) expect_rds_generation(to_rmd(data.frame(x = 1:5, y = letters[1:5]))) at test-to_rmd.R:78:5
    2. │ └─testthat::expect_match(result, "^```[{][rR].*[}].*readRDS[(].*[)].*```[ \n]*$") at test-to_rmd.R:59:5
    3. │   └─testthat::quasi_label(enquo(object), label)
    4. │     └─rlang::eval_bare(expr, quo_get_env(quo))
    5. ├─teal.reporter::to_rmd(data.frame(x = 1:5, y = letters[1:5]))
    6. └─teal.reporter:::to_rmd.default(data.frame(x = 1:5, y = letters[1:5]))
    7.   ├─teal.reporter:::.to_rmd(block, ...)
    8.   └─teal.reporter:::.to_rmd.data.frame(block, ...)
    9.     └─teal.reporter:::to_flextable(block)
   10.       └─rtables.officer::tt_to_flextable(rtables::df_to_tt(content))
   11.         ├─rtables::matrix_form(tt, fontspec = fontspec, indent_rownames = FALSE)
   12.         └─rtables::matrix_form(tt, fontspec = fontspec, indent_rownames = FALSE)
   13.           └─rtables:::.tbl_header_mat(obj)
   14.             ├─base::matrix(...)
   15.             └─base::rapply(...)
   16.               └─rtables (local) `<fn>`(X, ...)
   17.                 ├─rtables::get_formatted_cells(x)
   18.                 └─rtables::get_formatted_cells(x)
   19.                   ├─base::matrix(...)
   20.                   ├─base::unlist(...)
   21.                   └─base::Map(...)
   22.                     └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   23.                       └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   24.                         └─rtables::format_rcell(...)
   25.                           └─formatters::format_value(...)
   26.                             └─base::match.arg(round_type)
  ── Error ('test-utils.R:3:3'): to_flextable: supported class `data.frame` ──────
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. └─teal.reporter:::to_flextable(data_frame) at test-utils.R:3:3
    2.   └─rtables.officer::tt_to_flextable(rtables::df_to_tt(content))
    3.     ├─rtables::matrix_form(tt, fontspec = fontspec, indent_rownames = FALSE)
    4.     └─rtables::matrix_form(tt, fontspec = fontspec, indent_rownames = FALSE)
    5.       └─rtables:::.tbl_header_mat(obj)
    6.         ├─base::matrix(...)
    7.         └─base::rapply(...)
    8.           └─rtables (local) `<fn>`(X, ...)
    9.             ├─rtables::get_formatted_cells(x)
   10.             └─rtables::get_formatted_cells(x)
   11.               ├─base::matrix(...)
   12.               ├─base::unlist(...)
   13.               └─base::Map(...)
   14.                 └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   15.                   └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   16.                     └─rtables::format_rcell(...)
   17.                       └─formatters::format_value(...)
   18.                         └─base::match.arg(round_type)
  ── Error ('test-utils.R:8:3'): to_flextable: supported class `rtables` ─────────
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. ├─... %>% rtables::build_table(formatters::DM) at test-utils.R:8:3
    2. └─rtables::build_table(., formatters::DM)
    3.   └─rtables::update_ref_indexing(tab)
    4.     ├─formatters::make_row_df(tt)
    5.     └─rtables::make_row_df(tt)
    6.       └─rtables (local) .local(...)
    7.         ├─formatters::make_row_df(...)
    8.         └─rtables::make_row_df(...)
    9.           └─rtables (local) .local(...)
   10.             ├─formatters::pagdfrow(...)
   11.             │ └─base::data.frame(...)
   12.             ├─formatters::nlines(...)
   13.             └─rtables::nlines(...)
   14.               ├─base::as.vector(get_formatted_cells(x))
   15.               ├─rtables::get_formatted_cells(x)
   16.               └─rtables::get_formatted_cells(x)
   17.                 ├─base::matrix(...)
   18.                 ├─base::unlist(...)
   19.                 └─base::Map(...)
   20.                   └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   21.                     └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   22.                       └─rtables::format_rcell(...)
   23.                         └─formatters::format_value(...)
   24.                           └─base::match.arg(round_type)
  ── Error ('test-utils.R:17:3'): to_flextable: supported class `listing_df` ─────
  Error in `match.arg(round_type)`: 'arg' must be of length 1
  Backtrace:
       ▆
    1. └─teal.reporter:::to_flextable(lsting) at test-utils.R:17:3
    2.   └─rtables.officer::tt_to_flextable(...)
    3.     ├─rtables::matrix_form(tt, fontspec = fontspec, indent_rownames = FALSE)
    4.     └─rtables::matrix_form(tt, fontspec = fontspec, indent_rownames = FALSE)
    5.       └─rtables:::.tbl_header_mat(obj)
    6.         ├─base::matrix(...)
    7.         └─base::rapply(...)
    8.           └─rtables (local) `<fn>`(X, ...)
    9.             ├─rtables::get_formatted_cells(x)
   10.             └─rtables::get_formatted_cells(x)
   11.               ├─base::matrix(...)
   12.               ├─base::unlist(...)
   13.               └─base::Map(...)
   14.                 └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   15.                   └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   16.                     └─rtables::format_rcell(...)
   17.                       └─formatters::format_value(...)
   18.                         └─base::match.arg(round_type)
  
  [ FAIL 27 | WARN 1 | SKIP 6 | PASS 348 ]
  Error:
  ! Test failures.
  Execution halted
* checking for unstated dependencies in vignettes ... OK
* checking package vignettes ... OK
* checking re-building of vignette outputs ... [8s] OK
* checking PDF version of manual ... [20s] OK
* checking HTML version of manual ... [9s] OK
* DONE
Status: 2 ERRORs