Package: autoslider.core
Check: examples
New result: ERROR
  Running examples in ‘autoslider.core-Ex.R’ failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### Name: generate_slides
  > ### Title: generate slides based on output
  > ### Aliases: generate_slides
  > 
  > ### ** Examples
  > 
  > ## Don't show: 
  > if (require(filters)) withAutoprint({ # examplesIf
  + ## End(Don't show)
  + 
  + # Example 1. When applying to the whole pipeline
  + library(dplyr)
  + data <- list(
  +   adsl = eg_adsl %>% dplyr::mutate(FASFL = SAFFL),
  +   adae = eg_adae
  + )
  + 
  + 
  + filters::load_filters(
  +   yaml_file = system.file("filters.yml", package = "autoslider.core"),
  +   overwrite = TRUE
  + )
  + 
  + 
  + spec_file <- system.file("spec.yml", package = "autoslider.core")
  + spec_file %>%
  +   read_spec() %>%
  +   filter_spec(program %in% c("t_dm_slide")) %>%
  +   generate_outputs(datasets = data) %>%
  +   decorate_outputs() %>%
  +   generate_slides()
  + 
  + # Example 2. When applying to an rtable object or an rlisting object
  + adsl <- eg_adsl
  + t_dm_slide(adsl, "TRT01P", c("SEX", "AGE")) %>%
  +   generate_slides()
  + ## Don't show: 
  + }) # examplesIf
  Loading required package: filters
  > library(dplyr)
  
  Attaching package: ‘dplyr’
  
  The following objects are masked from ‘package:stats’:
  
      filter, lag
  
  The following objects are masked from ‘package:base’:
  
      intersect, setdiff, setequal, union
  
  > data <- list(adsl = eg_adsl %>% dplyr::mutate(FASFL = SAFFL), adae = eg_adae)
  > filters::load_filters(yaml_file = system.file("filters.yml", package = "autoslider.core"), 
  +     overwrite = TRUE)
  > spec_file <- system.file("spec.yml", package = "autoslider.core")
  > spec_file %>% read_spec() %>% filter_spec(program %in% c("t_dm_slide")) %>% 
  +     generate_outputs(datasets = data) %>% decorate_outputs() %>% generate_slides()
  ✔ 2/51 outputs matched the filter condition `program %in% c("t_dm_slide")`.
  ❯ Running program `t_dm_slide` with suffix 'FAS'.
  Filter 'FAS' matched target ADSL.
  400/400 records matched the filter condition `FASFL == 'Y'`.
  ⚠ Error: 'arg' must be of length 1
  ❯ Running program `t_dm_slide` with suffix 'FAS'.
  Filter 'FAS' matched target ADSL.
  400/400 records matched the filter condition `FASFL == 'Y'`.
  ⚠ Error: 'arg' must be of length 1
  'arg' must be of length 1
  'arg' must be of length 1
  > adsl <- eg_adsl
  > t_dm_slide(adsl, "TRT01P", c("SEX", "AGE")) %>% generate_slides()
  Error in match.arg(round_type) : 'arg' must be of length 1
  Calls: withAutoprint ... <Anonymous> -> format_rcell -> format_value -> match.arg
  Execution halted

Package: autoslider.core
Check: re-building of vignette outputs
New result: ERROR
  Error(s) in re-building vignettes:
    ...
  --- re-building ‘adding_templates.Rmd’ using rmarkdown
  [WARNING] Deprecated: --highlight-style. Use --syntax-highlighting instead.
  --- finished re-building ‘adding_templates.Rmd’
  
  --- re-building ‘autoslideR.Rmd’ using rmarkdown
  
  Quitting from autoslideR.Rmd:377-379 [unnamed-chunk-10]
  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  <error/rlang_error>
  Error in `h()`:
  ! error in evaluating the argument 'tt' in selecting a method for function 'collect_leaves': 'arg' must be of length 1
  ---
  Backtrace:
       ▆
    1. ├─global lbt06(data)
    2. │ ├─... %>% rtables::trim_rows()
    3. │ └─rtables::build_table(lyt = lyt, df = adlb_f_crp, alt_counts_df = adsl)
    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)
   32. │                                     └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
   33. ├─rtables::trim_rows(.)
   34. │ └─rtables::collect_leaves(tt, TRUE, TRUE)
   35. └─base::.handleSimpleError(...)
   36.   └─base (local) h(simpleError(msg, call))
  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  
  Error: processing vignette 'autoslideR.Rmd' failed with diagnostics:
  error in evaluating the argument 'tt' in selecting a method for function 'collect_leaves': 'arg' must be of length 1
  --- failed re-building ‘autoslideR.Rmd’
  
  --- re-building ‘downstream.Rmd’ using rmarkdown
  [WARNING] Deprecated: --highlight-style. Use --syntax-highlighting instead.
  --- finished re-building ‘downstream.Rmd’
  
  --- re-building ‘generate_placeholder_slides.Rmd’ using rmarkdown
  [WARNING] Deprecated: --highlight-style. Use --syntax-highlighting instead.
  --- finished re-building ‘generate_placeholder_slides.Rmd’
  
  --- re-building ‘opensource.Rmd’ using rmarkdown
  [WARNING] Deprecated: --highlight-style. Use --syntax-highlighting instead.
  --- finished re-building ‘opensource.Rmd’
  
  --- re-building ‘tlg_templates.Rmd’ using rmarkdown
  Warning in get_engine(options$engine) :
    Unknown language engine 'r_function_call' (must be registered via knit_engines$set()).
  
  Quitting from tlg_templates.Rmd:211-229 [unnamed-chunk-7]
  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  <error/rlang_error>
  Error in `match.arg()`:
  ! 'arg' must be of length 1
  ---
  Backtrace:
       ▆
    1. └─global demography(data$adsl)
    2.   └─autoslider.core::lyt_to_side_by_side(lyt, adsl1, side_by_side)
    3.     └─rtables::build_table(lyt = lyt, df = anl)
    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::pagdfrow(...)
   15.                     │ └─base::data.frame(...)
   16.                     ├─formatters::nlines(...)
   17.                     └─rtables::nlines(...)
   18.                       ├─base::as.vector(get_formatted_cells(x))
   19.                       ├─rtables::get_formatted_cells(x)
   20.                       └─rtables::get_formatted_cells(x)
   21.                         ├─base::matrix(...)
   22.                         ├─base::unlist(...)
   23.                         └─base::Map(...)
   24.                           └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
   25.                             └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
   26.                               └─rtables::format_rcell(...)
   27.                                 └─formatters::format_value(...)
   28.                                   └─base::match.arg(round_type)
  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  
  Error: processing vignette 'tlg_templates.Rmd' failed with diagnostics:
  'arg' must be of length 1
  --- failed re-building ‘tlg_templates.Rmd’
  
  --- re-building ‘use_LLM.Rmd’ using rmarkdown
  [WARNING] Deprecated: --highlight-style. Use --syntax-highlighting instead.
  --- finished re-building ‘use_LLM.Rmd’
  
  --- re-building ‘using_formats.Rmd’ using rmarkdown
  [WARNING] Deprecated: --highlight-style. Use --syntax-highlighting instead.
  --- finished re-building ‘using_formats.Rmd’
  
  SUMMARY: processing the following files failed:
    ‘autoslideR.Rmd’ ‘tlg_templates.Rmd’
  
  Error: Vignette re-building failed.
  Execution halted

Package: autoslider.core
Check: tests
New result: ERROR
    Running ‘testthat.R’ [38s/38s]
  Running the tests in ‘tests/testthat.R’ failed.
  Complete output:
    > pkg_name <- "autoslider.core"
    > library(testthat)
    > test_check(pkg_name, reporter = ParallelProgressReporter$new())
    Loading required package: autoslider.core
    
    Attaching package: 'dplyr'
    
    The following objects are masked from 'package:stats':
    
        filter, lag
    
    The following objects are masked from 'package:base':
    
        intersect, setdiff, setequal, union
    
    Loading required package: formatters
    
    Attaching package: 'formatters'
    
    The following object is masked from 'package:base':
    
        %||%
    
    Loading required package: magrittr
    
    Attaching package: 'magrittr'
    
    The following objects are masked from 'package:testthat':
    
        equals, is_less_than, not
    
    
    Attaching package: 'rtables'
    
    The following object is masked from 'package:utils':
    
        str
    
    
    Attaching package: 'purrr'
    
    The following object is masked from 'package:magrittr':
    
        set_names
    
    The following object is masked from 'package:formatters':
    
        %||%
    
    Loading required package: ggplot2
    ✔ | F W  S  OK | Context
    
    ⠋ [ FAIL 0 | WARN 0 | SKIP 0 | PASS 0 ] Starting up...                          
    ✔ |         22 | appendix [3.7s]                                                
    
    ✔ |         17 | assert                                                         
    Loading required package: filters
    <simpleError: `target` must be a character vector containing no `NA` values.>
    
    ✔ |          1 | bad_filters                                                    
    
    ✔ |      1   0 | data_snapshot                                                  
    [[1]]
    
    [[1]]
    
    [[2]]
    
    
    ✔ |   1      9 | decorate [2.8s]                                                
    ────────────────────────────────────────────────────────────────────────────────
    Warning ('test-decorate.R:71:3'): Test ph_with_img not to throw
    Calling `add_slide()` without specifying a `layout` is deprecated.
     Please pass a `layout` or use `layout_default()` to set a default.
     => I will now continue with the former `layout` default "Title and Content" for backwards compatibility...
    Backtrace:
        ▆
     1. └─autoslider.core:::do_call(add_slide, x = ppt, master = ppt_master) at test-decorate.R:71:3
     2.   ├─base::do.call(fun, args[intersect(names(args), formalArgs(fun))])
     3.   └─officer (local) `<fn>`(x = `<rpptx>`, master = "Office Theme")
     4.     └─base::.Deprecated(...)
    ────────────────────────────────────────────────────────────────────────────────
    
    ✔ |      1   0 | filter_spec-verbose                                            
    
    ✔ |          6 | formats                                                        
    v 3/3 outputs matched the filter condition `program %in% c("t_ds_slide", "t_dm_slide", "t_ae_slide")`.
    > Running program `t_ds_slide` with suffix 'ITT'.
    Filter 'ITT' matched target ADSL.
    400/400 records matched the filter condition `ITTFL == 'Y'`.
    ! Error: 'arg' must be of length 1
    > Running program `t_dm_slide` with suffix 'ITT'.
    Filter 'ITT' matched target ADSL.
    400/400 records matched the filter condition `ITTFL == 'Y'`.
    ! Error: 'arg' must be of length 1
    > Running program `t_ae_slide` with suffix 'SER'.
    Filter 'SER' matched target ADAE.
    786/1934 records matched the filter condition `AESER == 'Y'`.
    ! Error: 'arg' must be of length 1
    
    ✖ | 1        0 | ft_format [2.0s]                                               
    ────────────────────────────────────────────────────────────────────────────────
    Error ('test-ft_format.R:90:3'): demographic table formatting
    Error in `h(simpleError(msg, call))`: error in evaluating the argument 'obj' in selecting a method for function 'matrix_form': no applicable method for `@` applied to an object of class "autoslider_error"
    Backtrace:
        ▆
     1. ├─autoslider.core:::to_flextable.dVTableTree(...) at test-ft_format.R:90:3
     2. │ └─rtables::paginate_table(dtbl@tbl, lpp = lpp, cpp = cpp)
     3. │   ├─formatters::propose_column_widths(...)
     4. │   │ └─methods::is(x, "MatrixPrintForm")
     5. │   └─formatters::matrix_form(...)
     6. └─base::.handleSimpleError(...)
     7.   └─base (local) h(simpleError(msg, call))
    ────────────────────────────────────────────────────────────────────────────────
    Filter 'SE' matched target ADSL.
    400/400 records matched the filter condition `SAFFL == 'Y'`.
    Filter 'SE' matched target ADSL.
    400/400 records matched the filter condition `SAFFL == 'Y'`.
    Filter 'SE' matched target ADSL.
    400/400 records matched the filter condition `SAFFL == 'Y'`.
    Filter 'SE' matched target ADSL.
    400/400 records matched the filter condition `SAFFL == 'Y'`.
    Filter 'SE' matched target ADSL.
    400/400 records matched the filter condition `SAFFL == 'Y'`.
    
    ✖ | 2        3 | func_wrapper [1.4s]                                            
    ────────────────────────────────────────────────────────────────────────────────
    Error ('test-func_wrapper.R:21:3'): legacy with datasets and spec
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core (local) wrapped(aesi = "CQ01NAM", grad_var = "AETOXGR") at test-func_wrapper.R:21:3
      2.   └─autoslider.core::fastDoCall(...)
      3.     └─base::eval(call, envir = args, enclos = envir)
      4.       └─base::eval(call, envir = args, enclos = envir)
      5.         └─autoslider.core (local) func(adsl = adsl, adae = adae, aesi = aesi, grad_var = grad_var)
      6.           └─rtables::build_table(lyt_adae, df = adae2, alt_counts_df = adsl)
      7.             └─rtables::update_ref_indexing(tab)
      8.               ├─formatters::make_row_df(tt)
      9.               └─rtables::make_row_df(tt)
     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-func_wrapper.R:30:3'): legacy with datasets but no spec
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core (local) wrapped(arm = "TRT01A", split_by_study = TRUE) at test-func_wrapper.R:30:3
      2.   └─autoslider.core::fastDoCall(...)
      3.     └─base::eval(call, envir = args, enclos = envir)
      4.       └─base::eval(call, envir = args, enclos = envir)
      5.         └─autoslider.core (local) `<fn>`(adsl = adsl, arm = arm, split_by_study = split_by_study)
      6.           └─autoslider.core::lyt_to_side_by_side(lyt, anl, side_by_side)
      7.             └─rtables::build_table(lyt = lyt, df = anl)
      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::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)
    ────────────────────────────────────────────────────────────────────────────────
    
    ✔ |      5  10 | g_mean_slides [5.4s]                                           
    
    ✔ |      1   1 | helper_functions                                               
    Loading required package: tibble
    
    Attaching package: 'tibble'
    
    The following object is masked from 'package:assertthat':
    
        has_name
    
    
    ✔ |      1   0 | l_ae_slide [11.3s]                                             
    v Total number of success 100/100
    v Total number of success 99/100
    x Total number of failures 1/100
    
    ✔ |          2 | log                                                            
    
    ✖ | 1        0 | output-table-format                                            
    ────────────────────────────────────────────────────────────────────────────────
    Error ('test-output-table-format.R:2:3'): save an autoslider output
    Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'decorate': 'arg' must be of length 1
    Backtrace:
         ▆
      1. ├─... %>% list() at test-output-table-format.R:2:3
      2. ├─autoslider.core::decorate(., title = "test title", footnote = "")
      3. ├─autoslider.core::t_dm_slide(adsl = testdata$adsl)
      4. │ └─autoslider.core::lyt_to_side_by_side(lyt, adsl1, side_by_side)
      5. │   └─rtables::build_table(lyt = lyt, df = anl)
      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::pagdfrow(...)
     17. │                   │ └─base::data.frame(...)
     18. │                   ├─formatters::nlines(...)
     19. │                   └─rtables::nlines(...)
     20. │                     ├─base::as.vector(get_formatted_cells(x))
     21. │                     ├─rtables::get_formatted_cells(x)
     22. │                     └─rtables::get_formatted_cells(x)
     23. │                       ├─base::matrix(...)
     24. │                       ├─base::unlist(...)
     25. │                       └─base::Map(...)
     26. │                         └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
     27. │                           └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
     28. │                             └─rtables::format_rcell(...)
     29. │                               └─formatters::format_value(...)
     30. │                                 └─base::match.arg(round_type)
     31. │                                   └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
     32. └─base::.handleSimpleError(...)
     33.   └─base (local) h(simpleError(msg, call))
    ────────────────────────────────────────────────────────────────────────────────
    
    ✖ | 3        0 | save_output [1.3s]                                             
    ────────────────────────────────────────────────────────────────────────────────
    Error ('test-save_output.R:4:3'): save an output
    Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'decorate': 'arg' must be of length 1
    Backtrace:
         ▆
      1. ├─t_dm_slide(adsl = testdata$adsl) %>% ... at test-save_output.R:4:3
      2. ├─autoslider.core::decorate(., title = "test title", footnote = "")
      3. ├─autoslider.core::t_dm_slide(adsl = testdata$adsl)
      4. │ └─autoslider.core::lyt_to_side_by_side(lyt, adsl1, side_by_side)
      5. │   └─rtables::build_table(lyt = lyt, df = anl)
      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::pagdfrow(...)
     17. │                   │ └─base::data.frame(...)
     18. │                   ├─formatters::nlines(...)
     19. │                   └─rtables::nlines(...)
     20. │                     ├─base::as.vector(get_formatted_cells(x))
     21. │                     ├─rtables::get_formatted_cells(x)
     22. │                     └─rtables::get_formatted_cells(x)
     23. │                       ├─base::matrix(...)
     24. │                       ├─base::unlist(...)
     25. │                       └─base::Map(...)
     26. │                         └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
     27. │                           └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
     28. │                             └─rtables::format_rcell(...)
     29. │                               └─formatters::format_value(...)
     30. │                                 └─base::match.arg(round_type)
     31. │                                   └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
     32. └─base::.handleSimpleError(...)
     33.   └─base (local) h(simpleError(msg, call))
    
    Error ('test-save_output.R:23:3'): Test save_output (Save an Output)
    Error in `h(simpleError(msg, call))`: error in evaluating the argument 'output' in selecting a method for function 'save_output': error in evaluating the argument 'x' in selecting a method for function 'decorate': 'arg' must be of length 1
    Backtrace:
         ▆
      1. ├─base::print(...)
      2. ├─... %>% ...
      3. ├─autoslider.core::save_output(...)
      4. ├─autoslider.core::decorate(...)
      5. ├─autoslider.core::t_ae_pt_slide(adsl, adae, "TRT01A", 2)
      6. │ └─autoslider.core:::t_ae_pt_core(...)
      7. │   └─autoslider.core::lyt_to_side_by_side_two_data(...)
      8. │     └─rtables::build_table(lyt = lyt, df = anl, alt_counts_df = alt_counts_df)
      9. │       └─rtables::update_ref_indexing(tab)
     10. │         ├─formatters::make_row_df(tt)
     11. │         └─rtables::make_row_df(tt)
     12. │           └─rtables (local) .local(...)
     13. │             ├─formatters::make_row_df(...)
     14. │             └─rtables::make_row_df(...)
     15. │               └─rtables (local) .local(...)
     16. │                 ├─formatters::pagdfrow(...)
     17. │                 │ └─base::data.frame(...)
     18. │                 ├─formatters::nlines(...)
     19. │                 └─rtables::nlines(...)
     20. │                   ├─base::as.vector(get_formatted_cells(x))
     21. │                   ├─rtables::get_formatted_cells(x)
     22. │                   └─rtables::get_formatted_cells(x)
     23. │                     ├─base::matrix(...)
     24. │                     ├─base::unlist(...)
     25. │                     └─base::Map(...)
     26. │                       └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
     27. │                         └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
     28. │                           └─rtables::format_rcell(...)
     29. │                             └─formatters::format_value(...)
     30. │                               └─base::match.arg(round_type)
     31. │                                 └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
     32. ├─base::.handleSimpleError(...)
     33. │ └─base (local) h(simpleError(msg, call))
     34. └─base::.handleSimpleError(...)
     35.   └─base (local) h(simpleError(msg, call))
    
    Error ('test-save_output.R:40:3'): save an output
    Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'decorate': 'arg' must be of length 1
    Backtrace:
         ▆
      1. ├─t_ds_slide(adsl = testdata$adsl) %>% ... at test-save_output.R:40:3
      2. ├─autoslider.core::decorate(., title = "test title", footnote = "")
      3. ├─autoslider.core::t_ds_slide(adsl = testdata$adsl)
      4. │ └─autoslider.core::lyt_to_side_by_side(lyt, adsl1, side_by_side)
      5. │   └─rtables::build_table(lyt = lyt, df = anl)
      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::pagdfrow(...)
     17. │                   │ └─base::data.frame(...)
     18. │                   ├─formatters::nlines(...)
     19. │                   └─rtables::nlines(...)
     20. │                     ├─base::as.vector(get_formatted_cells(x))
     21. │                     ├─rtables::get_formatted_cells(x)
     22. │                     └─rtables::get_formatted_cells(x)
     23. │                       ├─base::matrix(...)
     24. │                       ├─base::unlist(...)
     25. │                       └─base::Map(...)
     26. │                         └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
     27. │                           └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
     28. │                             └─rtables::format_rcell(...)
     29. │                               └─formatters::format_value(...)
     30. │                                 └─base::match.arg(round_type)
     31. │                                   └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
     32. └─base::.handleSimpleError(...)
     33.   └─base (local) h(simpleError(msg, call))
    ────────────────────────────────────────────────────────────────────────────────
    
    ✖ | 1        0 | slides_preview                                                 
    ────────────────────────────────────────────────────────────────────────────────
    Error ('test-slides_preview.R:3:3'): Test slides preview
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core::t_dm_slide(adsl, "TRT01P", c("SEX", "AGE", "RACE")) at test-slides_preview.R:3:3
      2.   └─autoslider.core::lyt_to_side_by_side(lyt, adsl1, side_by_side)
      3.     └─rtables::build_table(lyt = lyt, df = anl)
      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::pagdfrow(...)
     15.                     │ └─base::data.frame(...)
     16.                     ├─formatters::nlines(...)
     17.                     └─rtables::nlines(...)
     18.                       ├─base::as.vector(get_formatted_cells(x))
     19.                       ├─rtables::get_formatted_cells(x)
     20.                       └─rtables::get_formatted_cells(x)
     21.                         ├─base::matrix(...)
     22.                         ├─base::unlist(...)
     23.                         └─base::Map(...)
     24.                           └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
     25.                             └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
     26.                               └─rtables::format_rcell(...)
     27.                                 └─formatters::format_value(...)
     28.                                   └─base::match.arg(round_type)
    ────────────────────────────────────────────────────────────────────────────────
    
    ✔ |      1   0 | srep_outputs                                                   
    
    ⠙ [ FAIL 15 | WARN 1 | SKIP 10 | PASS 72 ] @ t_ae_pt_diff_slide                 
    ────────────────────────────────────────────────────────────────────────────────
    Error ('test-t_ae_pt_diff_slide.R:2:3'): Test table creation of t_ae_pt_diff_slide  (safety summary table)
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core::t_ae_pt_diff_slide(...)
      2.   └─autoslider.core:::t_ae_pt_core(...)
      3.     └─autoslider.core::lyt_to_side_by_side_two_data(...)
      4.       └─rtables::build_table(lyt = lyt, df = anl, alt_counts_df = alt_counts_df)
      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::pagdfrow(...)
     13.                   │ └─base::data.frame(...)
     14.                   ├─formatters::nlines(...)
     15.                   └─rtables::nlines(...)
     16.                     ├─base::as.vector(get_formatted_cells(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-t_ae_pt_diff_slide.R:6:3'): Test table creation of t_ae_pt_diff_slide  (safety summary table) prune by total 2
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core::t_ae_pt_diff_slide(...)
      2.   └─autoslider.core:::t_ae_pt_core(...)
      3.     └─autoslider.core::lyt_to_side_by_side_two_data(...)
      4.       └─rtables::build_table(lyt = lyt, df = anl, alt_counts_df = alt_counts_df)
      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::pagdfrow(...)
     13.                   │ └─base::data.frame(...)
     14.                   ├─formatters::nlines(...)
     15.                   └─rtables::nlines(...)
     16.                     ├─base::as.vector(get_formatted_cells(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-t_ae_pt_diff_slide.R:11:3'): Test table creation of t_ae_pt_slide (safety summary table) prune by total 2
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core::t_ae_pt_diff_slide(...)
      2.   └─autoslider.core:::t_ae_pt_core(...)
      3.     └─autoslider.core::lyt_to_side_by_side_two_data(...)
      4.       └─rtables::build_table(lyt = lyt, df = anl, alt_counts_df = alt_counts_df)
      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::pagdfrow(...)
     13.                   │ └─base::data.frame(...)
     14.                   ├─formatters::nlines(...)
     15.                   └─rtables::nlines(...)
     16.                     ├─base::as.vector(get_formatted_cells(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-t_ae_pt_diff_slide.R:17:3'): Test table creation of t_ae_pt_slide (safety summary table) prune by total 2
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core::t_ae_pt_diff_slide(...)
      2.   └─autoslider.core:::t_ae_pt_core(...)
      3.     └─autoslider.core::lyt_to_side_by_side_two_data(...)
      4.       └─rtables::build_table(lyt = lyt, df = anl, alt_counts_df = alt_counts_df)
      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::pagdfrow(...)
     13.                   │ └─base::data.frame(...)
     14.                   ├─formatters::nlines(...)
     15.                   └─rtables::nlines(...)
     16.                     ├─base::as.vector(get_formatted_cells(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-t_ae_pt_diff_slide.R:25:3'): Test table creation of t_ae_pt_slide (safety summary table) prune by total 2
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core::t_ae_pt_diff_slide(...)
      2.   └─autoslider.core:::t_ae_pt_core(...)
      3.     └─autoslider.core::lyt_to_side_by_side_two_data(...)
      4.       └─rtables::build_table(lyt = lyt, df = anl, alt_counts_df = alt_counts_df)
      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::pagdfrow(...)
     13.                   │ └─base::data.frame(...)
     14.                   ├─formatters::nlines(...)
     15.                   └─rtables::nlines(...)
     16.                     ├─base::as.vector(get_formatted_cells(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-t_ae_pt_diff_slide.R:43:3'): Test table creation of t_ae_pt_slide (safety summary table) prune by total 2
    Error in `match.arg(round_type)`: 'arg' must be of length 1
    Backtrace:
         ▆
      1. └─autoslider.core::t_ae_pt_diff_slide(...)
      2.   └─autoslider.core:::t_ae_pt_core(...)
      3.     └─autoslider.core::lyt_to_side_by_side_two_data(...)
      4.       └─rtables::build_table(lyt = lyt, df = anl, alt_counts_df = alt_counts_df)
      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::pagdfrow(...)
     13.                   │ └─base::data.frame(...)
     14.                   ├─formatters::nlines(...)
     15.                   └─rtables::nlines(...)
     16.                     ├─base::as.vector(get_formatted_cells(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-t_ae_pt_diff_slide.R:57:3'): Test table creation of t_ae_pt_diff_slide with null_report
    Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
    Backtrace:
         ▆
      1. ├─testthat::expect_snapshot(...) at test-t_ae_pt_diff_slide.R:57:3
      2. │ └─testthat:::expect_snapshot_(...)
      3. │   ├─testthat:::with_is_snapshotting(...)
      4. │   └─testthat:::verify_exec(quo_get_expr(x), quo_get_env(x), replay)
      5. │     └─evaluate::evaluate(source, envir = env, new_device = FALSE, output_handler = handler)
      6. │       ├─base::withRestarts(...)
      7. │       │ └─base (local) withRestartList(expr, restarts)
      8. │       │   ├─base (local) withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]])
      9. │       │   │ └─base (local) doWithOneRestart(return(expr), restart)
     10. │       │   └─base (local) withRestartList(expr, restarts[-nr])
     11. │       │     └─base (local) withOneRestart(expr, restarts[[1L]])
     12. │       │       └─base (local) doWithOneRestart(return(expr), restart)
     13. │       ├─evaluate:::with_handlers(...)
     14. │       │ ├─base::eval(call)
     15. │       │ │ └─base::eval(call)
     16. │       │ └─base::withCallingHandlers(...)
     17. │       └─watcher$print_value(ev$value, ev$visible, envir)
     18. │         ├─base::withVisible(handle_value(handler, value, visible, envir))
     19. │         └─evaluate:::handle_value(handler, value, visible, envir)
     20. │           ├─handler$value(value)
     21. │           └─testthat:::testthat_print.default(value)
     22. │             ├─base::print(x)
     23. │             └─base::print.default(x)
     24. │               ├─methods (local) `<stndrdGn>`(`<ElmntryT[,1]>`)
     25. │               └─rtables (local) `<stndrdGn>`(`<ElmntryT[,1]>`)
     26. │                 ├─base::cat(toString(object))
     27. │                 ├─base::toString(object)
     28. │                 └─rtables::toString(object)
     29. │                   └─rtables (local) .local(x, ...)
     30. │                     ├─base::toString(...)
     31. │                     ├─formatters::matrix_form(...)
     32. │                     └─rtables::matrix_form(...)
     33. │                       └─rtables:::.tbl_header_mat(obj)
     34. │                         ├─base::matrix(...)
     35. │                         └─base::rapply(...)
     36. │                           └─rtables (local) `<fn>`(X, ...)
     37. │                             ├─rtables::get_formatted_cells(x)
     38. │                             └─rtables::get_formatted_cells(x)
     39. │                               ├─base::matrix(...)
     40. │                               ├─base::unlist(...)
     41. │                               └─base::Map(...)
     42. │                                 └─base::mapply(FUN = f, ..., SIMPLIFY = FALSE)
     43. │                                   └─rtables (local) `<fn>`(val = dots[[1L]][[1L]], spn = dots[[2L]][[1L]], shelli = dots[[3L]][[1L]])
     44. │                                     └─rtables::format_rcell(...)
     45. │                                       └─formatters::format_value(...)
     46. │                                         └─base::match.arg(round_type)
     47. │                                           └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
     48. └─base::.handleSimpleError(...)
     49.   └─base (local) h(simpleError(msg, call))
    
    Maximum number of failures exceeded; quitting.
    ℹ Increase this number with (e.g.) `testthat::set_max_fails(Inf)` 
    
                                                                                    Error:
    ! Test failures.
    Execution halted

Package: rworkflows
Check: tests
New result: ERROR
    Running ‘testthat.R’ [13s/19s]
  Running the tests in ‘tests/testthat.R’ failed.
  Complete output:
    > # This file is part of the standard setup for testthat.
    > # It is recommended that you do not modify it.
    > #
    > # Where should you do additional test configuration?
    > # Learn more about the roles of various files in:
    > # * https://r-pkgs.org/tests.html
    > # * https://testthat.r-lib.org/reference/test_package.html#special-files
    > 
    > library(testthat)
    > library(rworkflows)
    > 
    > test_check("rworkflows")
    Saving yaml ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/file696a716977360myenv_conda.yml
    Saving yaml ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/file696a716977360myenv_conda.yml
    Saving yaml ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/file696a716977360myenv_conda.yml
    name: myenv
    channels:
    - conda-forge
    - nodefaults
    dependencies:
    - anndata
    - scanpy
    Saving yaml ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/file696a716977360myenv_conda.yml
    Loading required namespace: reticulate
    Only tag name supplied to 'cont'. Assuming default= 'bioconductor/bioconductor_docker'
    Constructing DESCRIPTION files for 1 R package(s).
    Constructing DESCRIPTION for: ABSSeq
    trying URL 'https://github.com/neurogenomics/templateR/raw/master/DESCRIPTION'
    Content type 'text/plain; charset=utf-8' length 692 bytes
    ==================================================
    downloaded 692 bytes
    
    Updating: Package --> MyPackageName
    Updating: Title --> This Package Does Awesome Stuff
    Updating: Description --> MyPackageName does several awesome things. Describe thing1. Describe thing2. Describe thing3.
    Updating: Authors --> yourGivenName yourFamilyName <yourEmail@email.com> [cre] (ORCID: yourOrcidId)
    Updating: Depends --> R (>= 4.6)
    Deleting field: Suggests
    Updating: biocViews --> Genetics, SystemsBiology
    Updating: URL --> https://github.com/OwnerName/MyPackageName
    Updating: BugReports --> https://github.com/OwnerName/MyPackageName/issues
    Saving updated file: /home/hornik/tmp/scratch/Rtmp4R8OU6/DESCRIPTION696a74619f39
    Cannot import DESCRIPTION file: NULL
    When refs is provided, paths must have the same length (or be set to NULL). Setting paths=NULL.
    When refs is provided, paths must have the same length (or be set to NULL). Setting paths=NULL.
    Cannot find DESCRIPTION for: typoooo
    Cannot find DESCRIPTION file for: typoooo
    Cannot import DESCRIPTION file: typo
    Cannot import DESCRIPTION file: /home/hornik/tmp/CRAN_recheck/rworkflows.Rcheck/tests/DESCRIPTION
    When refs is provided, paths must have the same length (or be set to NULL). Setting paths=NULL.
    trying URL 'https://github.com/neurogenomics/MAGMA_Celltyping/raw/master/DESCRIPTION'
    Content type 'text/plain; charset=utf-8' length 2110 bytes
    ==================================================
    downloaded 2110 bytes
    
    Cannot find DESCRIPTION for: MAGMA_Celltyping
    Searching for DESCRIPTION file(s) in R repositories: BioCsoft, BioCann, BioCexp, BioCworkflows, CRAN
    Constructing DESCRIPTION files for 1 R package(s).
    Constructing DESCRIPTION for: ABSSeq
    Skipping test.
    Cannot find DESCRIPTION for: orthogene
    trying URL 'https://github.com/neurogenomics/orthogene/raw/main/DESCRIPTION'
    Content type 'text/plain; charset=utf-8' length 1680 bytes
    ==================================================
    downloaded 1680 bytes
    
    Finding hex sticker(s) for 1 package(s).
    Finding hex sticker(s) for 1 package(s).
    Cannot import DESCRIPTION file: /home/hornik/tmp/CRAN_recheck/rworkflows.Rcheck/tests/DESCRIPTION
    Skipping test.
    Cannot import DESCRIPTION file: NULL
    Finding hex sticker(s) for 1 package(s).
    Finding hex sticker(s) for 1 package(s).
    When refs is provided, paths must have the same length (or be set to NULL). Setting paths=NULL.
    Finding hex sticker(s) for 1 package(s).
    Finding hex sticker(s) for 1 package(s).
    Finding hex sticker(s) for 1 package(s).
    Cannot find hex URL domain name. Returning NULL.
    Finding hex sticker(s) for 1 package(s).
    Hex URL does not exist (or is not public). Returning NULL.
    Finding hex sticker(s) for 1 package(s).
    Skipping test.
    Skipping test.
    Loading required namespace: biocViews
    trying URL 'https://github.com/neurogenomics/templateR/raw/master/DESCRIPTION'
    Content type 'text/plain; charset=utf-8' length 692 bytes
    ==================================================
    downloaded 692 bytes
    
    Saving _problems/test-infer_docker_org-14.R
    Hello world
    Creating new dev container config file ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/devcontainer.json
    Using existing dev container config file ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/devcontainer.json
    Config file preview:
    {"image":["ghcr.io/neurogenomics/rworkflows:dev"],"features":{"ghcr.io/devcontainers/features/conda:1":[]},"customizations":{"vscode":{"settings":[],"extensions":[["reditorsupport.r"],["visualstudioexptteam.vscodeintellicode"],["ionutvmi.path-autocomplete"]]}}}Creating new Docker file ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/Dockerfile
    Using existing Docker file: /home/hornik/tmp/scratch/Rtmp4R8OU6/Dockerfile
    Docker file preview:
    Creating new Issue Template ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/bug_report.yml
    Creating new Issue Template ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/feature_request.yml
    Creating new Issue Template ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/config.yml
    Using existing Issue Template: /home/hornik/tmp/scratch/Rtmp4R8OU6/bug_report.yml
    Issue Template preview:
    Using existing Issue Template: /home/hornik/tmp/scratch/Rtmp4R8OU6/feature_request.yml
    Issue Template preview:
    Using existing Issue Template: /home/hornik/tmp/scratch/Rtmp4R8OU6/config.yml
    Issue Template preview:
    Creating new README file ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/README.Rmd
    Using existing README file: /home/hornik/tmp/scratch/Rtmp4R8OU6/README.Rmd
    README file preview:
    Creating new vignette file ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/vignettes/docker.Rmd
    Using existing vignette file: /home/hornik/tmp/scratch/Rtmp4R8OU6/vignettes/docker.Rmd
    Vignette file preview:
    Creating new vignette file ==> /home/hornik/tmp/scratch/Rtmp4R8OU6/vignettes/mypackage.Rmd
    [ FAIL 1 | WARN 3 | SKIP 10 | PASS 92 ]
    
    ══ Skipped tests (10) ══════════════════════════════════════════════════════════
    • On CRAN (10): 'test-bioc_r_versions.R:3:3', 'test-check_cont.R:4:5',
      'test-check_r_version.R:3:3', 'test-construct_cont.R:22:3',
      'test-construct_runners.R:3:3', 'test-get_yaml.R:2:3',
      'test-gha_python_versions.R:3:3', 'test-url_exists.R:3:3',
      'test-use_badges.R:2:3', 'test-use_workflow.R:2:3'
    
    ══ Failed tests ════════════════════════════════════════════════════════════════
    ── Failure ('test-infer_docker_org.R:14:3'): infer_docker_org works ────────────
    Expected `out` to equal "vubiostat".
    Differences:
    `actual`:   "r-lib"    
    `expected`: "vubiostat"
    
    
    [ FAIL 1 | WARN 3 | SKIP 10 | PASS 92 ]
    Error:
    ! Test failures.
    Execution halted

Package: teal.reporter
Check: examples
New result: ERROR
  Running examples in ‘teal.reporter-Ex.R’ failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### 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

Package: teal.reporter
Check: tests
New result: ERROR
    Running ‘testthat.R’ [47s/47s]
  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
    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
    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