Running ‘testthat.R’ [5s/6s]
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(metalite.sl)
  > 
  > test_check("metalite.sl")
  The outdata is saved in/tmp/Rtmpytsnhl/file162b7b380f29b9.Rdata
  The output is saved in/tmp/Rtmpytsnhl/disposition1.rtf
  The outdata is saved in/tmp/Rtmpytsnhl/file162b7b1f796536.Rdata
  The output is saved in/tmp/Rtmpytsnhl/disposition2.rtf
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  
  Attaching package: 'tidyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The outdata is saved in/tmp/Rtmpytsnhl/file162b7b6c3a73fa.Rdata
  The outdata is saved in/tmp/Rtmpytsnhl/file162b7b767d8627.Rdata
  The outdata is saved in/tmp/Rtmpytsnhl/file162b7b8136047.Rdata
  The outdata is saved in/tmp/Rtmpytsnhl/file162b7b33fe0514.Rdata
  The output is saved in/tmp/Rtmpytsnhl/trt_compliance.rtf
  The outdata is saved in/tmp/Rtmpytsnhl/file162b7b4fc3a305.Rdata
  The output is saved in/tmp/Rtmpytsnhl/trt_compliance1.rtf
  [ FAIL 3 | WARN 0 | SKIP 4 | PASS 41 ]
  
  ══ Skipped tests (4) ═══════════════════════════════════════════════════════════
  • On CRAN (4): 'test-independent-testing-disposition.R:32:3',
    'test-independent-testing-disposition.R:55:3',
    'test-independent-testing-trt_compliance.R:32:3',
    'test-independent-testing-trt_compliance.R:55:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-independent-testing-rtf_exp_duration.R:19:3'): rtf output: n, and prop, NO total. With 2 decimal places. ──
  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.sl::rtf_exp_duration(...) at test-independent-testing-rtf_exp_duration.R:19:3
    2.   └─metalite.sl::rtf_sl_summary(...)
    3.     └─metalite.sl:::rtf_output(outdata, path_outdata, path_outtable)
    4.       ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    5.       │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    6.       │ │ └─base::cat(...)
    7.       │ ├─base::paste(unlist(rtf), collapse = "\n")
    8.       │ └─base::unlist(rtf)
    9.       └─r2rtf::rtf_encode(outdata$rtf)
   10.         └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   11.           ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   12.           └─r2rtf:::as_rtf_footnote(tbl_1)
   13.             └─base::unlist(...)
  ── Error ('test-independent-testing-rtf_exp_duration.R:38:3'): rtf output: n, prop and total, with Landscape ──
  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.sl::rtf_exp_duration(...) at test-independent-testing-rtf_exp_duration.R:38:3
    2.   └─metalite.sl::rtf_sl_summary(...)
    3.     └─metalite.sl:::rtf_output(outdata, path_outdata, path_outtable)
    4.       ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    5.       │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    6.       │ │ └─base::cat(...)
    7.       │ ├─base::paste(unlist(rtf), collapse = "\n")
    8.       │ └─base::unlist(rtf)
    9.       └─r2rtf::rtf_encode(outdata$rtf)
   10.         └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   11.           ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   12.           └─r2rtf:::as_rtf_footnote(tbl_1)
   13.             └─base::unlist(...)
  ── Error ('test-independent-testing-rtf_exp_duration.R:57:3'): rtf output: n, prop and total, with no value of col_rel_width ──
  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.sl::rtf_exp_duration(...) at test-independent-testing-rtf_exp_duration.R:57:3
    2.   └─metalite.sl::rtf_sl_summary(...)
    3.     └─metalite.sl:::rtf_output(outdata, path_outdata, path_outtable)
    4.       ├─r2rtf::write_rtf(r2rtf::rtf_encode(outdata$rtf), file = path_outtable)
    5.       │ ├─base::write(paste(unlist(rtf), collapse = "\n"), file)
    6.       │ │ └─base::cat(...)
    7.       │ ├─base::paste(unlist(rtf), collapse = "\n")
    8.       │ └─base::unlist(rtf)
    9.       └─r2rtf::rtf_encode(outdata$rtf)
   10.         └─r2rtf:::rtf_encode_table(tbl, verbose = verbose)
   11.           ├─base::paste(as_rtf_footnote(tbl_1), collapse = "\n")
   12.           └─r2rtf:::as_rtf_footnote(tbl_1)
   13.             └─base::unlist(...)
  
  [ FAIL 3 | WARN 0 | SKIP 4 | PASS 41 ]
  Error: Test failures
  Execution halted