Running ‘testthat.R’ [74s/92s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(metalite.ae)
  > 
  > test_check("metalite.ae")
  Generating empty table due to zero observations...
  any
  any
  any
  any
  any
  any
  any
  any
  any
  rel
  nonser
  ser
  ser0rel
  dth
  dtc0rel
  disc
  disc0drel
  disc0ser
  disc0ser0rel
  The outdata is saved in/tmp/Rtmp25eEP8/file11f4415572dd05.Rdata
  The output is saved in/tmp/Rtmp25eEP8/ednp_ae0listing.rtf
  any
  any
  The outdata is saved in/tmp/Rtmp25eEP8/file11f4415e5a4d7.Rdata
  The output is saved in/tmp/Rtmp25eEP8/ae0summary0a.rtf
  any
  any
  The outdata is saved in/tmp/Rtmp25eEP8/file11f441255c9310.Rdata
  The output is saved in/tmp/Rtmp25eEP8/ae0summary0b.rtf
  The outdata is saved in/tmp/Rtmp25eEP8/file11f44141417d96.Rdata
  The outdata is saved in/tmp/Rtmp25eEP8/file11f4411241a507.Rdata
  The outdata is saved in/tmp/Rtmp25eEP8/file11f4412430cb69.Rdata
  The outdata is saved in/tmp/Rtmp25eEP8/file11f44153917e42.Rdata
  The outdata is saved in/tmp/Rtmp25eEP8/file11f4416225e3d.Rdata
  any
  rel
  ser
  The outdata is saved in/tmp/Rtmp25eEP8/file11f4411b69b8c7.Rdata
  The output is saved in/tmp/Rtmp25eEP8/tlf_ae_summary.rtf
  [ FAIL 7 | WARN 0 | SKIP 7 | PASS 206 ]
  
  ══ Skipped tests (7) ═══════════════════════════════════════════════════════════
  • On CRAN (7): 'test-independent-testing-empty_table.R:68:5',
    'test-independent-testing-tlf-ae-listing.R:23:3',
    'test-independent-testing-tlf_ae_exp_adj.R:28:3',
    'test-independent-testing-tlf_ae_exp_adj.R:58:3',
    'test-independent-testing-tlf_ae_summary.R:22:3',
    'test-independent-testing-to_mock.R:6:3',
    'test-independent-testing-to_mock.R:10:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-independent-testing-tlf_ae_specific.R:13:3'): rtf output: events, dur, n, and prop w/o total ──
  Error in `unlist(attr(text, "text_indent_first"), attr(text, "text_indent_left"), 
      attr(text, "text_indent_right"))`: 'recursive' must be a length-1 vector
  Backtrace:
       ▆
    1. └─metalite.ae::tlf_ae_specific(...) at test-independent-testing-tlf_ae_specific.R:13:3
    2.   └─metalite.ae:::rtf_output(outdata, path_outdata, path_outtable)
    3.     ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    4.     │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    5.     │ │ └─base::cat(...)
    6.     │ ├─base::paste(unlist(rtf), collapse = "\n")
    7.     │ └─base::unlist(rtf)
    8.     └─r2rtf::rtf_encode(outdata$rtf)
    9.       └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   10.         ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   11.         └─r2rtf:::as_rtf_footnote(tbl_1)
   12.           └─base::unlist(...)
  ── Error ('test-independent-testing-tlf_ae_specific.R:34:3'): rtf output: events, dur, n, and prop w/ total ──
  Error in `unlist(attr(text, "text_indent_first"), attr(text, "text_indent_left"), 
      attr(text, "text_indent_right"))`: 'recursive' must be a length-1 vector
  Backtrace:
       ▆
    1. └─metalite.ae::tlf_ae_specific(...) at test-independent-testing-tlf_ae_specific.R:34:3
    2.   └─metalite.ae:::rtf_output(outdata, path_outdata, path_outtable)
    3.     ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    4.     │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    5.     │ │ └─base::cat(...)
    6.     │ ├─base::paste(unlist(rtf), collapse = "\n")
    7.     │ └─base::unlist(rtf)
    8.     └─r2rtf::rtf_encode(outdata$rtf)
    9.       └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   10.         ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   11.         └─r2rtf:::as_rtf_footnote(tbl_1)
   12.           └─base::unlist(...)
  ── Error ('test-independent-testing-tlf_ae_specific.R:56:3'): rtf output: diff, events, dur, n, and prop w/o total ──
  Error in `unlist(attr(text, "text_indent_first"), attr(text, "text_indent_left"), 
      attr(text, "text_indent_right"))`: 'recursive' must be a length-1 vector
  Backtrace:
       ▆
    1. └─metalite.ae::tlf_ae_specific(...) at test-independent-testing-tlf_ae_specific.R:56:3
    2.   └─metalite.ae:::rtf_output(outdata, path_outdata, path_outtable)
    3.     ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    4.     │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    5.     │ │ └─base::cat(...)
    6.     │ ├─base::paste(unlist(rtf), collapse = "\n")
    7.     │ └─base::unlist(rtf)
    8.     └─r2rtf::rtf_encode(outdata$rtf)
    9.       └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   10.         ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   11.         └─r2rtf:::as_rtf_footnote(tbl_1)
   12.           └─base::unlist(...)
  ── Error ('test-independent-testing-tlf_ae_specific.R:78:3'): rtf output: diff, events, dur, n, and prop w/ total ──
  Error in `unlist(attr(text, "text_indent_first"), attr(text, "text_indent_left"), 
      attr(text, "text_indent_right"))`: 'recursive' must be a length-1 vector
  Backtrace:
       ▆
    1. └─metalite.ae::tlf_ae_specific(...) at test-independent-testing-tlf_ae_specific.R:78:3
    2.   └─metalite.ae:::rtf_output(outdata, path_outdata, path_outtable)
    3.     ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    4.     │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    5.     │ │ └─base::cat(...)
    6.     │ ├─base::paste(unlist(rtf), collapse = "\n")
    7.     │ └─base::unlist(rtf)
    8.     └─r2rtf::rtf_encode(outdata$rtf)
    9.       └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   10.         ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   11.         └─r2rtf:::as_rtf_footnote(tbl_1)
   12.           └─base::unlist(...)
  ── Error ('test-independent-testing-tlf_ae_specific.R:102:3'): rtf output: events, dur, n, and prop w/ total ──
  Error in `unlist(attr(text, "text_indent_first"), attr(text, "text_indent_left"), 
      attr(text, "text_indent_right"))`: 'recursive' must be a length-1 vector
  Backtrace:
       ▆
    1. └─metalite.ae::tlf_ae_specific(...) at test-independent-testing-tlf_ae_specific.R:102:3
    2.   └─metalite.ae:::rtf_output(outdata, path_outdata, path_outtable)
    3.     ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    4.     │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    5.     │ │ └─base::cat(...)
    6.     │ ├─base::paste(unlist(rtf), collapse = "\n")
    7.     │ └─base::unlist(rtf)
    8.     └─r2rtf::rtf_encode(outdata$rtf)
    9.       └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   10.         ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   11.         └─r2rtf:::as_rtf_footnote(tbl_1)
   12.           └─base::unlist(...)
  ── Error ('test-independent-testing-tlf_ae_specific.R:179:7'): relative width 'works' ──
  Error in `unlist(attr(text, "text_indent_first"), attr(text, "text_indent_left"), 
      attr(text, "text_indent_right"))`: 'recursive' must be a length-1 vector
  Backtrace:
       ▆
    1. ├─testthat::expect_message(...) at test-independent-testing-tlf_ae_specific.R:177:3
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. └─metalite.ae::tlf_ae_specific(...) at test-independent-testing-tlf_ae_specific.R:179:7
    8.   └─metalite.ae:::rtf_output(outdata, path_outdata, path_outtable)
    9.     ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
   10.     │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
   11.     │ │ └─base::cat(...)
   12.     │ ├─base::paste(unlist(rtf), collapse = "\n")
   13.     │ └─base::unlist(rtf)
   14.     └─r2rtf::rtf_encode(outdata$rtf)
   15.       └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   16.         ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   17.         └─r2rtf:::as_rtf_footnote(tbl_1)
   18.           └─base::unlist(...)
  ── Error ('test-independent-testing-tlf_ae_specific_subgroup.R:14:3'): rtf output: n, and prop w/o total ──
  Error in `unlist(attr(text, "text_indent_first"), attr(text, "text_indent_left"), 
      attr(text, "text_indent_right"))`: 'recursive' must be a length-1 vector
  Backtrace:
       ▆
    1. └─metalite.ae::tlf_ae_specific_subgroup(...) at test-independent-testing-tlf_ae_specific_subgroup.R:14:3
    2.   └─metalite.ae:::rtf_output(outdata, path_outdata, path_outtable)
    3.     ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    4.     │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    5.     │ │ └─base::cat(...)
    6.     │ ├─base::paste(unlist(rtf), collapse = "\n")
    7.     │ └─base::unlist(rtf)
    8.     └─r2rtf::rtf_encode(outdata$rtf)
    9.       └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   10.         ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   11.         └─r2rtf:::as_rtf_footnote(tbl_1)
   12.           └─base::unlist(...)
  
  [ FAIL 7 | WARN 0 | SKIP 7 | PASS 206 ]
  Error: Test failures
  Execution halted