CRAN Package Check Results for Package chevron

Last updated on 2024-06-21 06:58:10 CEST.

Flavor	Version	Tinstall	Tcheck	Ttotal	Status	Flags
r-devel-linux-x86_64-debian-clang	0.2.6	24.84	1118.89	1143.73	OK
r-devel-linux-x86_64-debian-gcc	0.2.6	18.04	292.41	310.45	ERROR
r-devel-linux-x86_64-fedora-clang	0.2.6			1398.44	OK
r-devel-linux-x86_64-fedora-gcc	0.2.6			1399.79	OK
r-devel-windows-x86_64	0.2.6	21.00	673.00	694.00	OK
r-patched-linux-x86_64	0.2.6	27.69	1067.86	1095.55	OK
r-release-linux-x86_64	0.2.6	25.97	1058.85	1084.82	OK
r-release-macos-arm64	0.2.6			216.00	OK
r-release-macos-x86_64	0.2.6			484.00	OK
r-release-windows-x86_64	0.2.6	21.00	674.00	695.00	OK
r-oldrel-macos-arm64	0.2.6			232.00	OK
r-oldrel-macos-x86_64	0.2.6			379.00	OK
r-oldrel-windows-x86_64	0.2.6	27.00	924.00	951.00	OK

Check Details

Version: 0.2.6
Check: examples
Result: ERROR Running examples in ‘chevron-Ex.R’ failed The error most likely occurred in: > base::assign(".ptime", proc.time(), pos = "CheckExEnv") > ### Name: ael01_nollt_main > ### Title: 'AEL01_NOLLT' Listing 1 (Default) Glossary of Preferred Terms > ### and Investigator-Specified Terms. > ### Aliases: ael01_nollt_main ael01_nollt_pre ael01_nollt_post ael01_nollt > ### Keywords: datasets > > ### ** Examples > > run(ael01_nollt, syn_data) Error in h(simpleError(msg, call)) : error in evaluating the argument 'x' in selecting a method for function 'toString': argument "fontspec" is missing, with no default Calls: <Anonymous> ... wrap_txt -> open_font_dev -> .handleSimpleError -> h Execution halted Flavor: r-devel-linux-x86_64-debian-gcc

Version: 0.2.6
Check: tests
Result: ERROR Running ‘testthat.R’ [156s/215s] 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(checkmate) > library(chevron) > > test_check("chevron") [ FAIL 171 | WARN 0 | SKIP 11 | PASS 169 ] ══ Skipped tests (11) ══════════════════════════════════════════════════════════ • !interactive() is TRUE (1): 'test-chevron_tlg-methods.R:185:3' • On CRAN (10): 'test-chevron_tlg-methods.R:219:3', 'test-chevron_tlg-methods.R:223:3', 'test-mng01.R:10:5', 'test-mng01.R:45:5', 'test-mng01.R:68:5', 'test-mng01.R:80:5', 'test-mng01.R:97:5', 'test-mng01.R:117:5', 'test-mng01.R:134:5', 'test-utils.R:76:1' ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-ael01_nollt.R:7:3'): ael01_nollt works with admh dataset ─────── Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-ael01_nollt.R:7:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-ael01_nollt.R:20:3'): ael01_nollt works with non-default label ── Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-ael01_nollt.R:20:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-ael01_nollt.R:33:3'): ael01_nollt can handle all missing values ── Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-ael01_nollt.R:33:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-ael01_nollt.R:48:3'): ael01_nollt can handle some missing values ── Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-ael01_nollt.R:48:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-ael01_nollt.R:63:3'): ael01_nollt listing can be split by an additional variable ── Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-ael01_nollt.R:63:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-ael01_nollt.R:81:3'): split ael01_nollt listing do not display missing values ── Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-ael01_nollt.R:81:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-aet01.R:11:3'): aet01 can handle all NA values ───────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet01, proc_data)) at test-aet01.R:11:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet01, proc_data) 10. ├─chevron::run(aet01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. ├─base::rbind(...) 15. ├─base::rbind(...) 16. └─rtables::build_table(lyts$ae1, adam_db$adae, alt_counts_df = adam_db$adsl) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::pagdfrow(...) 25. │ └─base::data.frame(...) 26. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables (local) .local(x, colwidths, max_width) 29. ├─base::unlist(...) 30. └─base::mapply(...) 31. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 32. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. ├─base::unlist(...) 35. └─base::vapply(...) 36. ├─formatters (local) FUN(X[[i]], ...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─base::vapply(...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 41. └─formatters::open_font_dev(fontspec) ── Error ('test-aet01.R:28:3'): aet01 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet01, proc_data)) at test-aet01.R:28:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet01, proc_data) 10. ├─chevron::run(aet01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. ├─base::rbind(...) 15. ├─base::rbind(...) 16. └─rtables::build_table(lyts$ae1, adam_db$adae, alt_counts_df = adam_db$adsl) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::pagdfrow(...) 25. │ └─base::data.frame(...) 26. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables (local) .local(x, colwidths, max_width) 29. ├─base::unlist(...) 30. └─base::mapply(...) 31. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 32. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. ├─base::unlist(...) 35. └─base::vapply(...) 36. ├─formatters (local) FUN(X[[i]], ...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─base::vapply(...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 41. └─formatters::open_font_dev(fontspec) ── Error ('test-aet01.R:34:3'): aet01 can use custom anl_vars ────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet01, proc_data, anl_vars = list(safety_var = "FATAL"))) at test-aet01.R:34:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet01, proc_data, anl_vars = list(safety_var = "FATAL")) 10. ├─chevron::run(aet01, proc_data, anl_vars = list(safety_var = "FATAL")) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, anl_vars = anl_vars) 14. ├─base::rbind(...) 15. ├─base::rbind(...) 16. └─rtables::build_table(lyts$ae1, adam_db$adae, alt_counts_df = adam_db$adsl) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::pagdfrow(...) 25. │ └─base::data.frame(...) 26. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables (local) .local(x, colwidths, max_width) 29. ├─base::unlist(...) 30. └─base::mapply(...) 31. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 32. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. ├─base::unlist(...) 35. └─base::vapply(...) 36. ├─formatters (local) FUN(X[[i]], ...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─base::vapply(...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 41. └─formatters::open_font_dev(fontspec) ── Error ('test-aet01.R:53:3'): aet01 can use custom medconcept_var ──────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-aet01.R:53:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, anl_vars = anl_vars) 14. ├─base::rbind(...) 15. ├─base::rbind(...) 16. └─rtables::build_table(lyts$ae1, adam_db$adae, alt_counts_df = adam_db$adsl) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::pagdfrow(...) 25. │ └─base::data.frame(...) 26. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables (local) .local(x, colwidths, max_width) 29. ├─base::unlist(...) 30. └─base::mapply(...) 31. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 32. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. ├─base::unlist(...) 35. └─base::vapply(...) 36. ├─formatters (local) FUN(X[[i]], ...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─base::vapply(...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 41. └─formatters::open_font_dev(fontspec) ── Error ('test-aet01_aesi.R:16:3'): aet01_aesi can handle all NA values ─────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet01_aesi, proc_data)) at test-aet01_aesi.R:16:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet01_aesi, proc_data) 10. ├─chevron::run(aet01_aesi, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-aet01_aesi.R:29:3'): aet01_aesi can handle some NA values ────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet01_aesi, proc_data)) at test-aet01_aesi.R:29:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet01_aesi, proc_data) 10. ├─chevron::run(aet01_aesi, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-aet01_aesi.R:35:3'): aet01_aesi works with `ALL` argument ────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet01_aesi, proc_data, aesi_vars = c("ALL"))) at test-aet01_aesi.R:35:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet01_aesi, proc_data, aesi_vars = c("ALL")) 10. ├─chevron::run(aet01_aesi, proc_data, aesi_vars = c("ALL")) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, aesi_vars = aesi_vars) 14. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-aet02.R:24:3'): aet02 handle empty data input ────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet02, proc_data)) at test-aet02.R:24:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet02, proc_data) 10. ├─chevron::run(aet02, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-aet02.R:28:3'): aet02 can have different levels of row_split ─── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(aet02, syn_data, row_split_var = NULL) at test-aet02.R:28:3 2. ├─chevron::run(aet02, syn_data, row_split_var = NULL) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, row_split_var = row_split_var) 6. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$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(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 21. └─rtables (local) .local(x, colwidths, max_width) 22. ├─base::unlist(...) 23. └─base::mapply(...) 24. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 25. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 27. ├─base::unlist(...) 28. └─base::vapply(...) 29. ├─formatters (local) FUN(X[[i]], ...) 30. └─formatters (local) FUN(X[[i]], ...) 31. └─base::vapply(...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 34. └─formatters::open_font_dev(fontspec) ── Error ('test-aet03.R:9:3'): aet03 can handle NA values ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet03, proc_data)) at test-aet03.R:9:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet03, proc_data) 10. ├─chevron::run(aet03, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-aet03.R:26:3'): aet03 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet03, proc_data)) at test-aet03.R:26:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet03, proc_data) 10. ├─chevron::run(aet03, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-aet04.R:9:3'): aet04 can handle NA values ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet04, proc_data)) at test-aet04.R:9:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet04, proc_data) 10. ├─chevron::run(aet04, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::pagdfrow(...) 32. │ └─base::data.frame(...) 33. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 34. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 35. └─rtables (local) .local(x, colwidths, max_width) 36. ├─base::unlist(...) 37. └─base::mapply(...) 38. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 39. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 40. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 41. ├─base::unlist(...) 42. └─base::vapply(...) 43. ├─formatters (local) FUN(X[[i]], ...) 44. └─formatters (local) FUN(X[[i]], ...) 45. └─base::vapply(...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 48. └─formatters::open_font_dev(fontspec) ── Error ('test-aet04.R:31:3'): aet04 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet04, proc_data)) at test-aet04.R:31:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet04, proc_data) 10. ├─chevron::run(aet04, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::pagdfrow(...) 32. │ └─base::data.frame(...) 33. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 34. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 35. └─rtables (local) .local(x, colwidths, max_width) 36. ├─base::unlist(...) 37. └─base::mapply(...) 38. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 39. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 40. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 41. ├─base::unlist(...) 42. └─base::vapply(...) 43. ├─formatters (local) FUN(X[[i]], ...) 44. └─formatters (local) FUN(X[[i]], ...) 45. └─base::vapply(...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 48. └─formatters::open_font_dev(fontspec) ── Error ('test-aet05.R:6:3'): aet05 can handle NA values ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet05, proc_data)) at test-aet05.R:6:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet05, proc_data) 10. ├─chevron::run(aet05, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-aet05.R:23:3'): aet05 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet05, proc_data)) at test-aet05.R:23:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet05, proc_data) 10. ├─chevron::run(aet05, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-aet05_all.R:6:3'): aet05_all can handle NA values ────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet05_all, proc_data)) at test-aet05_all.R:6:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet05_all, proc_data) 10. ├─chevron::run(aet05_all, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-aet05_all.R:20:3'): aet05_all can handle some NA values ──────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet05_all, proc_data)) at test-aet05_all.R:20:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet05_all, proc_data) 10. ├─chevron::run(aet05_all, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-aet10.R:9:3'): aet10 can handle NA values ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet10, proc_data)) at test-aet10.R:9:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet10, proc_data) 10. ├─chevron::run(aet10, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-aet10.R:23:3'): aet10 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(aet10, proc_data)) at test-aet10.R:23:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(aet10, proc_data) 10. ├─chevron::run(aet10, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-cfbt01.R:5:3'): cfbt01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::cfbt01_main(pre_data, dataset = "advs") at test-cfbt01.R:5:3 2. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-cfbt01.R:18:3'): cfbt01 can handle n = 0 and outputs NE instead of infs and NAs ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(cfbt01, proc_data, dataset = "advs")) at test-cfbt01.R:18:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(cfbt01, proc_data, dataset = "advs") 10. ├─chevron::run(cfbt01, proc_data, dataset = "advs") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, dataset = dataset) 14. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:7:3'): run works as expected for chevron_t object ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(aet04, syn_adv, prune_0 = TRUE) at test-chevron_tlg-methods.R:7:3 2. ├─chevron::run(aet04, syn_adv, prune_0 = TRUE) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, prune_0 = prune_0) 6. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::pagdfrow(...) 24. │ └─base::data.frame(...) 25. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables (local) .local(x, colwidths, max_width) 28. ├─base::unlist(...) 29. └─base::mapply(...) 30. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 31. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. ├─base::unlist(...) 34. └─base::vapply(...) 35. ├─formatters (local) FUN(X[[i]], ...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─base::vapply(...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 40. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:15:3'): run works as expected for chevron_t object when auto_pre = FALSE ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(dmt01, proc_data, auto_pre = FALSE) at test-chevron_tlg-methods.R:15:3 2. ├─chevron::run(dmt01, proc_data, auto_pre = FALSE) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db) 6. └─rtables::build_table(lyt, adam_db$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(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 21. └─rtables (local) .local(x, colwidths, max_width) 22. ├─base::unlist(...) 23. └─base::mapply(...) 24. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 25. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 27. ├─base::unlist(...) 28. └─base::vapply(...) 29. ├─formatters (local) FUN(X[[i]], ...) 30. └─formatters (local) FUN(X[[i]], ...) 31. └─base::vapply(...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 34. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:20:3'): run works as expected with argument printed ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::capture_output(...) at test-chevron_tlg-methods.R:20:3 2. │ └─testthat::capture_output_lines(code, print, width = width) 3. │ └─testthat:::eval_with_output(code, print = print, width = width) 4. │ ├─withr::with_output_sink(path, withVisible(code)) 5. │ │ └─base::force(code) 6. │ └─base::withVisible(code) 7. ├─chevron::run(aet02, syn_adv, prune_0 = TRUE, verbose = TRUE) 8. ├─chevron::run(aet02, syn_adv, prune_0 = TRUE, verbose = TRUE) 9. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 10. │ └─base::do.call(what, new_args, envir = args_env) 11. └─chevron (local) `<fn>`(adam_db = adam_db, prune_0 = prune_0) 12. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 13. └─rtables::update_ref_indexing(tab) 14. ├─formatters::make_row_df(tt) 15. └─rtables::make_row_df(tt) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::pagdfrow(...) 24. │ └─base::data.frame(...) 25. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables (local) .local(x, colwidths, max_width) 28. ├─base::unlist(...) 29. └─base::mapply(...) 30. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 31. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. ├─base::unlist(...) 34. └─base::vapply(...) 35. ├─formatters (local) FUN(X[[i]], ...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─base::vapply(...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 40. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:27:3'): run works as expected with argument printed if the user argument is complicated ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::capture_output(...) at test-chevron_tlg-methods.R:27:3 2. │ └─testthat::capture_output_lines(code, print, width = width) 3. │ └─testthat:::eval_with_output(code, print = print, width = width) 4. │ ├─withr::with_output_sink(path, withVisible(code)) 5. │ │ └─base::force(code) 6. │ └─base::withVisible(code) 7. ├─chevron::run(aet02, syn_adv, user_args = user_args, verbose = TRUE) 8. ├─chevron::run(aet02, syn_adv, user_args = user_args, verbose = TRUE) 9. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 10. │ └─base::do.call(what, new_args, envir = args_env) 11. └─chevron (local) `<fn>`(...) 12. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 13. └─rtables::update_ref_indexing(tab) 14. ├─formatters::make_row_df(tt) 15. └─rtables::make_row_df(tt) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::pagdfrow(...) 24. │ └─base::data.frame(...) 25. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables (local) .local(x, colwidths, max_width) 28. ├─base::unlist(...) 29. └─base::mapply(...) 30. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 31. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. ├─base::unlist(...) 34. └─base::vapply(...) 35. ├─formatters (local) FUN(X[[i]], ...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─base::vapply(...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 40. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:34:3'): run uses the argument passed through the ellipsis in priority ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::capture_output(...) at test-chevron_tlg-methods.R:34:3 2. │ └─testthat::capture_output_lines(code, print, width = width) 3. │ └─testthat:::eval_with_output(code, print = print, width = width) 4. │ ├─withr::with_output_sink(path, withVisible(code)) 5. │ │ └─base::force(code) 6. │ └─base::withVisible(code) 7. ├─chevron::run(...) 8. ├─chevron::run(...) 9. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 10. │ └─base::do.call(what, new_args, envir = args_env) 11. └─chevron (local) `<fn>`(...) 12. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 13. └─rtables::update_ref_indexing(tab) 14. ├─formatters::make_row_df(tt) 15. └─rtables::make_row_df(tt) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::pagdfrow(...) 24. │ └─base::data.frame(...) 25. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables (local) .local(x, colwidths, max_width) 28. ├─base::unlist(...) 29. └─base::mapply(...) 30. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 31. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. ├─base::unlist(...) 34. └─base::vapply(...) 35. ├─formatters (local) FUN(X[[i]], ...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─base::vapply(...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 40. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:50:3'): run works as expected with partial match argument ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::capture_output(...) at test-chevron_tlg-methods.R:50:3 2. │ └─testthat::capture_output_lines(code, print, width = width) 3. │ └─testthat:::eval_with_output(code, print = print, width = width) 4. │ ├─withr::with_output_sink(path, withVisible(code)) 5. │ │ └─base::force(code) 6. │ └─base::withVisible(code) 7. ├─chevron::run(...) 8. ├─chevron::run(...) 9. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 10. │ └─base::do.call(what, new_args, envir = args_env) 11. └─chevron (local) `<fn>`(adam_db = adam_db, prune_0 = prune_0, arm_var = arm_var) 12. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 13. └─rtables::update_ref_indexing(tab) 14. ├─formatters::make_row_df(tt) 15. └─rtables::make_row_df(tt) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::pagdfrow(...) 24. │ └─base::data.frame(...) 25. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables (local) .local(x, colwidths, max_width) 28. ├─base::unlist(...) 29. └─base::mapply(...) 30. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 31. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. ├─base::unlist(...) 34. └─base::vapply(...) 35. ├─formatters (local) FUN(X[[i]], ...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─base::vapply(...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 40. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:58:3'): run displays the symbols when available ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::capture_output(...) at test-chevron_tlg-methods.R:58:3 2. │ └─testthat::capture_output_lines(code, print, width = width) 3. │ └─testthat:::eval_with_output(code, print = print, width = width) 4. │ ├─withr::with_output_sink(path, withVisible(code)) 5. │ │ └─base::force(code) 6. │ └─base::withVisible(code) 7. ├─chevron::run(...) 8. ├─chevron::run(...) 9. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 10. │ └─base::do.call(what, new_args, envir = args_env) 11. └─chevron (local) `<fn>`(...) 12. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 13. └─rtables::update_ref_indexing(tab) 14. ├─formatters::make_row_df(tt) 15. └─rtables::make_row_df(tt) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::pagdfrow(...) 24. │ └─base::data.frame(...) 25. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables (local) .local(x, colwidths, max_width) 28. ├─base::unlist(...) 29. └─base::mapply(...) 30. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 31. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. ├─base::unlist(...) 34. └─base::vapply(...) 35. ├─formatters (local) FUN(X[[i]], ...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─base::vapply(...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 40. └─formatters::open_font_dev(fontspec) ── Error ('test-chevron_tlg-methods.R:205:3'): script_funs generates a valid script ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(...) 2. ├─chevron::run(...) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, arm_var = arm_var) 6. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::pagdfrow(...) 24. │ └─base::data.frame(...) 25. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables (local) .local(x, colwidths, max_width) 28. ├─base::unlist(...) 29. └─base::mapply(...) 30. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 31. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. ├─base::unlist(...) 34. └─base::vapply(...) 35. ├─formatters (local) FUN(X[[i]], ...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─base::vapply(...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 40. └─formatters::open_font_dev(fontspec) ── Error ('test-cmt01a.R:5:3'): cmt01a functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::cmt01a_main(pre_data) at test-cmt01a.R:5:3 2. └─rtables::build_table(lyt, adam_db$adcm, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-cmt01a.R:12:3'): cmt01a functions with custom argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::cmt01a_main(...) at test-cmt01a.R:12:3 2. └─rtables::build_table(lyt, adam_db$adcm, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-cmt01a.R:32:3'): cmt01a can handle all NA values ─────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(cmt01a, proc_data)) at test-cmt01a.R:32:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(cmt01a, proc_data) 10. ├─chevron::run(cmt01a, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adcm, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-cmt01a.R:40:3'): cmt01a can handle some NA values ────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(cmt01a, proc_data)) at test-cmt01a.R:40:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(cmt01a, proc_data) 10. ├─chevron::run(cmt01a, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adcm, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-cmt02_pt.R:8:3'): cmt02_pt can handle all NA values ──────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(cmt02_pt, proc_data)) at test-cmt02_pt.R:8:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(cmt02_pt, proc_data) 10. ├─chevron::run(cmt02_pt, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adcm, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-cmt02_pt.R:16:3'): cmt02_pt can handle some NA values ────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(cmt02_pt, proc_data)) at test-cmt02_pt.R:16:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(cmt02_pt, proc_data) 10. ├─chevron::run(cmt02_pt, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adcm, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-coxt01.R:5:3'): coxt01 can handle some NA values ─────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(coxt01, proc_data)) at test-coxt01.R:5:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(coxt01, proc_data) 10. ├─chevron::run(coxt01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adtte) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::pagdfrow(...) 32. │ └─base::data.frame(...) 33. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 34. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 35. └─rtables (local) .local(x, colwidths, max_width) 36. ├─base::unlist(...) 37. └─base::mapply(...) 38. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 39. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 40. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 41. ├─base::unlist(...) 42. └─base::vapply(...) 43. ├─formatters (local) FUN(X[[i]], ...) 44. └─formatters (local) FUN(X[[i]], ...) 45. └─base::vapply(...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 48. └─formatters::open_font_dev(fontspec) ── Error ('test-coxt02.R:4:3'): coxt02 can handle some NA values ─────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(coxt02, proc_data)) at test-coxt02.R:4:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(coxt02, proc_data) 10. ├─chevron::run(coxt02, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adtte) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::pagdfrow(...) 32. │ └─base::data.frame(...) 33. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 34. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 35. └─rtables (local) .local(x, colwidths, max_width) 36. ├─base::unlist(...) 37. └─base::mapply(...) 38. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 39. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 40. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 41. ├─base::unlist(...) 42. └─base::vapply(...) 43. ├─formatters (local) FUN(X[[i]], ...) 44. └─formatters (local) FUN(X[[i]], ...) 45. └─base::vapply(...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 48. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:5:3'): ael01_nollt function with default argument value return expected result with test data ── Error in `FUN(X[[i]], ...)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-default_tlg.R:5:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-default_tlg.R:10:3'): aet01 function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet01_main(pre_data) at test-default_tlg.R:10:3 2. ├─base::rbind(...) 3. ├─base::rbind(...) 4. └─rtables::build_table(lyts$ae1, adam_db$adae, alt_counts_df = adam_db$adsl) 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(tt, colwidths = colwidths, max_width = max_width) 15. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables (local) .local(x, colwidths, max_width) 17. ├─base::unlist(...) 18. └─base::mapply(...) 19. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 20. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 21. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. ├─base::unlist(...) 23. └─base::vapply(...) 24. ├─formatters (local) FUN(X[[i]], ...) 25. └─formatters (local) FUN(X[[i]], ...) 26. └─base::vapply(...) 27. └─formatters (local) FUN(X[[i]], ...) 28. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 29. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:17:3'): aet01_aesi function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet01_aesi_main(pre_data) at test-default_tlg.R:17:3 2. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:24:3'): aet02 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet02_main(pre_data) at test-default_tlg.R:24:3 2. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:31:3'): aet03 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet03_main(pre_data) at test-default_tlg.R:31:3 2. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:38:3'): aet04 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet04_main(pre_data) at test-default_tlg.R:38:3 2. └─rtables::build_table(lyt, df = adam_db$adae, alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 22. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 23. └─rtables (local) .local(x, colwidths, max_width) 24. ├─base::unlist(...) 25. └─base::mapply(...) 26. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 27. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 28. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 29. ├─base::unlist(...) 30. └─base::vapply(...) 31. ├─formatters (local) FUN(X[[i]], ...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─base::vapply(...) 34. └─formatters (local) FUN(X[[i]], ...) 35. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 36. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:45:3'): aet05 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet05_main(pre_data) at test-default_tlg.R:45:3 2. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:52:3'): aet05_all functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet05_main(pre_data) at test-default_tlg.R:52:3 2. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:59:3'): aet10 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::aet10_main(pre_data) at test-default_tlg.R:59:3 2. └─rtables::build_table(lyt, adam_db$adae, alt_counts_df = adam_db$adsl) 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(tt, colwidths = colwidths, max_width = max_width) 13. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 14. └─rtables (local) .local(x, colwidths, max_width) 15. ├─base::unlist(...) 16. └─base::mapply(...) 17. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 18. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 19. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 20. ├─base::unlist(...) 21. └─base::vapply(...) 22. ├─formatters (local) FUN(X[[i]], ...) 23. └─formatters (local) FUN(X[[i]], ...) 24. └─base::vapply(...) 25. └─formatters (local) FUN(X[[i]], ...) 26. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 27. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:66:3'): cmt02_pt functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::cmt02_pt_main(pre_data) at test-default_tlg.R:66:3 2. └─rtables::build_table(lyt, adam_db$adcm, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:76:3'): coxt01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::coxt01_main(pre_data) at test-default_tlg.R:76:3 2. └─rtables::build_table(lyt, adam_db$adtte) 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::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(tt, colwidths = colwidths, max_width = max_width) 22. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 23. └─rtables (local) .local(x, colwidths, max_width) 24. ├─base::unlist(...) 25. └─base::mapply(...) 26. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 27. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 28. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 29. ├─base::unlist(...) 30. └─base::vapply(...) 31. ├─formatters (local) FUN(X[[i]], ...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─base::vapply(...) 34. └─formatters (local) FUN(X[[i]], ...) 35. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 36. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:84:3'): coxt02 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::coxt02_main(pre_data) at test-default_tlg.R:84:3 2. └─rtables::build_table(lyt, adam_db$adtte) 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::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(tt, colwidths = colwidths, max_width = max_width) 22. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 23. └─rtables (local) .local(x, colwidths, max_width) 24. ├─base::unlist(...) 25. └─base::mapply(...) 26. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 27. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 28. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 29. ├─base::unlist(...) 30. └─base::vapply(...) 31. ├─formatters (local) FUN(X[[i]], ...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─base::vapply(...) 34. └─formatters (local) FUN(X[[i]], ...) 35. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 36. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:91:3'): dmt01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::dmt01_main(pre_data) at test-default_tlg.R:91:3 2. └─rtables::build_table(lyt, adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:98:3'): dst01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::dst01_main(pre_data) at test-default_tlg.R:98:3 2. └─rtables::build_table(lyt, adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-default_tlg.R:105:3'): dtht01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::dtht01_main(pre_data) at test-default_tlg.R:105:3 2. └─rtables::build_table(lyt, adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:7:3'): dmt01 can handle NA values ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(dmt01, proc_data)) at test-dmt01.R:7:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(dmt01, proc_data) 10. ├─chevron::run(dmt01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:14:3'): dmt01 can handle numeric NA values ───────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(dmt01, proc_data)) at test-dmt01.R:14:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(dmt01, proc_data) 10. ├─chevron::run(dmt01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:33:3'): dmt01 works as expected with setting default precision ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dmt01.R:33:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, summaryvars = summaryvars, precision = precision) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:38:3'): dmt01 works as expected with auto precision settings ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dmt01.R:38:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, summaryvars = summaryvars, precision = precision) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:43:3'): dmt01 works as expected with auto precision settings and defined precision ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dmt01.R:43:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, summaryvars = summaryvars, precision = precision) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:48:3'): dmt01 works as expected with auto precision settings and defined precision and default ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dmt01.R:48:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, summaryvars = summaryvars, precision = precision) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:55:3'): dmt01 works as expected with cutomized stats value ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dmt01.R:55:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:68:3'): dmt01 works as expected with empty list as stats value ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dmt01.R:68:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dmt01.R:81:3'): dmt01 works as expected with only one summaryvars ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(dmt01, syn_data, summaryvars = c("RACE"))) at test-dmt01.R:81:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(dmt01, syn_data, summaryvars = c("RACE")) 10. ├─chevron::run(dmt01, syn_data, summaryvars = c("RACE")) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, summaryvars = summaryvars) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-dst01.R:10:3'): dst01 works as expected when all data are NA ─── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(res <- run(dst01, proc_data, detail_vars = list())) at test-dst01.R:10:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(dst01, proc_data, detail_vars = list()) 10. ├─chevron::run(dst01, proc_data, detail_vars = list()) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, detail_vars = detail_vars) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dst01.R:21:3'): dst01 can handle all NA values in DCSREAS ────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(dst01, proc_data, detail_vars = list())) at test-dst01.R:21:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(dst01, proc_data, detail_vars = list()) 10. ├─chevron::run(dst01, proc_data, detail_vars = list()) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, detail_vars = detail_vars) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dst01.R:28:3'): dst01 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(dst01, proc_data)) at test-dst01.R:28:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(dst01, proc_data) 10. ├─chevron::run(dst01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-dst01.R:38:3'): dst01 can handle missing levels in status_var ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(dst01, proc_data, detail_vars = list())) at test-dst01.R:38:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(dst01, proc_data, detail_vars = list()) 10. ├─chevron::run(dst01, proc_data, detail_vars = list()) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, detail_vars = detail_vars) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dst01.R:43:3'): dst01 can create variants ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dst01.R:43:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, detail_vars = detail_vars) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dst01.R:48:3'): dst01 can create variants ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dst01.R:48:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, detail_vars = detail_vars) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-dst01.R:53:3'): dst01 can create variants ────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dst01.R:53:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, detail_vars = detail_vars, trt_status_var = trt_status_var) 14. └─rtables::build_table(lyt, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-dtht01.R:11:3'): dtht01 can handle all NA values ─────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dtht01.R:11:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dtht01.R:18:3'): dtht01 can handle some NA values ────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-dtht01.R:18:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-dtht01.R:28:3'): dtht01 can be parametrize as expected ───────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::dtht01_main(pre_data, time_since_last_dose = TRUE, other_category = TRUE) at test-dtht01.R:28:3 2. └─rtables::build_table(lyt, adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-egt01.R:5:3'): egt01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::egt01_main(pre_data) at test-egt01.R:5:3 2. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-egt01.R:17:3'): egt01 can handle n = 0 and outputs NE instead of infs and NAs ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-egt01.R:17:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(egt01, proc_data, precision = list(RR = 0, HR = 1)) 10. ├─chevron::run(egt01, proc_data, precision = list(RR = 0, HR = 1)) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, precision = precision) 14. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-egt02.R:5:3'): egt02_1 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::egt02_1_main(pre_data) at test-egt02.R:5:3 2. └─rtables::build_table(lyt, adam_db$adeg, alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-egt02.R:12:3'): egt02_2 functions with default value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::egt02_2_main(pre_data) at test-egt02.R:12:3 2. └─rtables::build_table(lyt, adam_db$adeg, alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-egt03.R:5:3'): egt03 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::egt03_main(pre_data) at test-egt03.R:5:3 2. └─rtables::build_table(lyt, df = adam_db$adeg) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-egt03.R:27:3'): egt03 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(egt03, proc_data)) at test-egt03.R:27:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(egt03, proc_data) 10. ├─chevron::run(egt03, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, df = adam_db$adeg) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-egt05_qtcat.R:5:3'): egt05_qtcat functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::egt05_qtcat_main(pre_data) at test-egt05_qtcat.R:5:3 2. └─rtables::build_table(lyt, df = adam_db$adeg, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-egt05_qtcat.R:27:3'): egt05_qtcat can handle some NA values ──── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(egt05_qtcat, proc_data)) at test-egt05_qtcat.R:27:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(egt05_qtcat, proc_data) 10. ├─chevron::run(egt05_qtcat, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, df = adam_db$adeg, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-empty_report.R:19:3'): tlg functions return null reports when domain table is empty ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(aet01, dat_empty, prune_0 = TRUE) at test-empty_report.R:19:3 2. ├─chevron::run(aet01, dat_empty, prune_0 = TRUE) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, prune_0 = prune_0) 6. ├─base::rbind(...) 7. ├─base::rbind(...) 8. └─rtables::build_table(lyts$ae1, adam_db$adae, alt_counts_df = adam_db$adsl) 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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-ext01.R:5:3'): ext01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::ext01_main(pre_data) at test-ext01.R:5:3 2. └─rtables::build_table(lyt, adam_db$adex, adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-ext01.R:13:3'): ext01 functions with categorical data return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::ext01_main(pre_data, summaryvars = c("AVAL", "AVALCAT1")) at test-ext01.R:13:3 2. └─rtables::build_table(lyt, adam_db$adex, adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-ext01.R:22:3'): ext01 works ──────────────────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(ext01, proc_data)) at test-ext01.R:22:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(ext01, proc_data) 10. ├─chevron::run(ext01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-ext01.R:35:3'): ext01 works for selected parameters and categorical variables ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(...) at test-ext01.R:35:3 2. ├─chevron::run(...) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, prune_0 = prune_0, summaryvars = summaryvars) 6. └─rtables::build_table(lyt, adam_db$adex, adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::pagdfrow(...) 27. │ └─base::data.frame(...) 28. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 30. └─rtables (local) .local(x, colwidths, max_width) 31. ├─base::unlist(...) 32. └─base::mapply(...) 33. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 34. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 36. ├─base::unlist(...) 37. └─base::vapply(...) 38. ├─formatters (local) FUN(X[[i]], ...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─base::vapply(...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 43. └─formatters::open_font_dev(fontspec) ── Error ('test-ext01.R:46:3'): ext01 works with custom mapping order ────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(...) at test-ext01.R:46:3 2. ├─chevron::run(...) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(...) 6. └─rtables::build_table(lyt, adam_db$adex, adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::pagdfrow(...) 27. │ └─base::data.frame(...) 28. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 30. └─rtables (local) .local(x, colwidths, max_width) 31. ├─base::unlist(...) 32. └─base::mapply(...) 33. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 34. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 36. ├─base::unlist(...) 37. └─base::vapply(...) 38. ├─formatters (local) FUN(X[[i]], ...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─base::vapply(...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 43. └─formatters::open_font_dev(fontspec) ── Error ('test-ext01.R:56:3'): ext01 works with custom mapping order for a single split ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(...) at test-ext01.R:56:3 2. ├─chevron::run(...) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(...) 6. └─rtables::build_table(lyt, adam_db$adex, adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::pagdfrow(...) 27. │ └─base::data.frame(...) 28. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 30. └─rtables (local) .local(x, colwidths, max_width) 31. ├─base::unlist(...) 32. └─base::mapply(...) 33. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 34. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 36. ├─base::unlist(...) 37. └─base::vapply(...) 38. ├─formatters (local) FUN(X[[i]], ...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─base::vapply(...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 43. └─formatters::open_font_dev(fontspec) ── Error ('test-ext01.R:67:3'): ext01 works with custom mapping fill in value ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(...) at test-ext01.R:67:3 2. ├─chevron::run(...) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(...) 6. └─rtables::build_table(lyt, adam_db$adex, adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::pagdfrow(...) 27. │ └─base::data.frame(...) 28. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 30. └─rtables (local) .local(x, colwidths, max_width) 31. ├─base::unlist(...) 32. └─base::mapply(...) 33. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 34. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 36. ├─base::unlist(...) 37. └─base::vapply(...) 38. ├─formatters (local) FUN(X[[i]], ...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─base::vapply(...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 43. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg01.R:6:3'): fstg01 works as expected ─────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(fstg01_main(pre_data, dataset = "adrs")) at test-fstg01.R:6:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::fstg01_main(pre_data, dataset = "adrs") 10. │ └─basic_table() %>% tabulate_rsp_subgroups(df, vars = stat_var) 11. └─tern::tabulate_rsp_subgroups(., df, vars = stat_var) 12. └─rtables::build_table(lyt_prop, df = df$prop) 13. └─rtables::update_ref_indexing(tab) 14. ├─formatters::make_row_df(tt) 15. └─rtables::make_row_df(tt) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::make_row_df(...) 27. └─rtables::make_row_df(...) 28. └─rtables (local) .local(...) 29. ├─formatters::pagdfrow(...) 30. │ └─base::data.frame(...) 31. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 33. └─rtables (local) .local(x, colwidths, max_width) 34. ├─base::unlist(...) 35. └─base::mapply(...) 36. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 37. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 39. ├─base::unlist(...) 40. └─base::vapply(...) 41. ├─formatters (local) FUN(X[[i]], ...) 42. └─formatters (local) FUN(X[[i]], ...) 43. └─base::vapply(...) 44. └─formatters (local) FUN(X[[i]], ...) 45. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 46. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg01.R:15:3'): fstg01 works as expected with custom color set ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-fstg01.R:15:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. ├─chevron (local) `<fn>`(...) 14. │ └─basic_table() %>% tabulate_rsp_subgroups(df, vars = stat_var) 15. └─tern::tabulate_rsp_subgroups(., df, vars = stat_var) 16. └─rtables::build_table(lyt_prop, df = df$prop) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::make_row_df(...) 25. └─rtables::make_row_df(...) 26. └─rtables (local) .local(...) 27. ├─formatters::make_row_df(...) 28. └─rtables::make_row_df(...) 29. └─rtables (local) .local(...) 30. ├─formatters::make_row_df(...) 31. └─rtables::make_row_df(...) 32. └─rtables (local) .local(...) 33. ├─formatters::pagdfrow(...) 34. │ └─base::data.frame(...) 35. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 36. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables (local) .local(x, colwidths, max_width) 38. ├─base::unlist(...) 39. └─base::mapply(...) 40. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 41. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 42. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. ├─base::unlist(...) 44. └─base::vapply(...) 45. ├─formatters (local) FUN(X[[i]], ...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─base::vapply(...) 48. └─formatters (local) FUN(X[[i]], ...) 49. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 50. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg01.R:25:3'): fstg01 works if changes are in subgroups, conf_level, and label_all ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-fstg01.R:25:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. ├─chevron (local) `<fn>`(...) 14. │ └─basic_table() %>% tabulate_rsp_subgroups(df, vars = stat_var) 15. └─tern::tabulate_rsp_subgroups(., df, vars = stat_var) 16. └─rtables::build_table(lyt_prop, df = df$prop) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::make_row_df(...) 25. └─rtables::make_row_df(...) 26. └─rtables (local) .local(...) 27. ├─formatters::make_row_df(...) 28. └─rtables::make_row_df(...) 29. └─rtables (local) .local(...) 30. ├─formatters::pagdfrow(...) 31. │ └─base::data.frame(...) 32. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 33. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 34. └─rtables (local) .local(x, colwidths, max_width) 35. ├─base::unlist(...) 36. └─base::mapply(...) 37. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 38. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 39. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 40. ├─base::unlist(...) 41. └─base::vapply(...) 42. ├─formatters (local) FUN(X[[i]], ...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─base::vapply(...) 45. └─formatters (local) FUN(X[[i]], ...) 46. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 47. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg01.R:41:3'): fstg01 can handle some NA values in subgroups ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-fstg01.R:41:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(fstg01, proc_data, response = c("CR", "PR"), dataset = "adrs") 10. ├─chevron::run(fstg01, proc_data, response = c("CR", "PR"), dataset = "adrs") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. ├─chevron (local) `<fn>`(adam_db = adam_db, response = response, dataset = dataset) 14. │ └─basic_table() %>% tabulate_rsp_subgroups(df, vars = stat_var) 15. └─tern::tabulate_rsp_subgroups(., df, vars = stat_var) 16. └─rtables::build_table(lyt_prop, df = df$prop) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::make_row_df(...) 25. └─rtables::make_row_df(...) 26. └─rtables (local) .local(...) 27. ├─formatters::make_row_df(...) 28. └─rtables::make_row_df(...) 29. └─rtables (local) .local(...) 30. ├─formatters::make_row_df(...) 31. └─rtables::make_row_df(...) 32. └─rtables (local) .local(...) 33. ├─formatters::pagdfrow(...) 34. │ └─base::data.frame(...) 35. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 36. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables (local) .local(x, colwidths, max_width) 38. ├─base::unlist(...) 39. └─base::mapply(...) 40. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 41. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 42. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. ├─base::unlist(...) 44. └─base::vapply(...) 45. ├─formatters (local) FUN(X[[i]], ...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─base::vapply(...) 48. └─formatters (local) FUN(X[[i]], ...) 49. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 50. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg02.R:6:3'): fstg02 works as expected ─────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(fstg02_main(pre_data, dataset = "adtte")) at test-fstg02.R:6:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::fstg02_main(pre_data, dataset = "adtte") 10. │ └─basic_table() %>% ... 11. └─tern::tabulate_survival_subgroups(., df, vars = stat_var, time_unit = timeunit) 12. └─rtables::build_table(lyt_survtime, df = df$survtime) 13. └─rtables::update_ref_indexing(tab) 14. ├─formatters::make_row_df(tt) 15. └─rtables::make_row_df(tt) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::make_row_df(...) 27. └─rtables::make_row_df(...) 28. └─rtables (local) .local(...) 29. ├─formatters::pagdfrow(...) 30. │ └─base::data.frame(...) 31. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 33. └─rtables (local) .local(x, colwidths, max_width) 34. ├─base::unlist(...) 35. └─base::mapply(...) 36. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 37. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 39. ├─base::unlist(...) 40. └─base::vapply(...) 41. ├─formatters (local) FUN(X[[i]], ...) 42. └─formatters (local) FUN(X[[i]], ...) 43. └─base::vapply(...) 44. └─formatters (local) FUN(X[[i]], ...) 45. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 46. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg02.R:15:3'): fstg02 works as expected with custom color set ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-fstg02.R:15:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(fstg02, proc_data, dataset = "adtte", col = "gray") 10. ├─chevron::run(fstg02, proc_data, dataset = "adtte", col = "gray") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. ├─chevron (local) `<fn>`(adam_db = adam_db, dataset = dataset, col = col) 14. │ └─basic_table() %>% ... 15. └─tern::tabulate_survival_subgroups(., df, vars = stat_var, time_unit = timeunit) 16. └─rtables::build_table(lyt_survtime, df = df$survtime) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::make_row_df(...) 25. └─rtables::make_row_df(...) 26. └─rtables (local) .local(...) 27. ├─formatters::make_row_df(...) 28. └─rtables::make_row_df(...) 29. └─rtables (local) .local(...) 30. ├─formatters::make_row_df(...) 31. └─rtables::make_row_df(...) 32. └─rtables (local) .local(...) 33. ├─formatters::pagdfrow(...) 34. │ └─base::data.frame(...) 35. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 36. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables (local) .local(x, colwidths, max_width) 38. ├─base::unlist(...) 39. └─base::mapply(...) 40. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 41. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 42. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. ├─base::unlist(...) 44. └─base::vapply(...) 45. ├─formatters (local) FUN(X[[i]], ...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─base::vapply(...) 48. └─formatters (local) FUN(X[[i]], ...) 49. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 50. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg02.R:25:3'): fstg02 works if changes are in subgroups, strata_var, conf_level, and label_all ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-fstg02.R:25:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(fstg02, proc_data, subgroups = NULL, dataset = "adtte") 10. ├─chevron::run(fstg02, proc_data, subgroups = NULL, dataset = "adtte") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. ├─chevron (local) `<fn>`(adam_db = adam_db, subgroups = subgroups, dataset = dataset) 14. │ └─basic_table() %>% ... 15. └─tern::tabulate_survival_subgroups(., df, vars = stat_var, time_unit = timeunit) 16. └─rtables::build_table(lyt_survtime, df = df$survtime) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::make_row_df(...) 25. └─rtables::make_row_df(...) 26. └─rtables (local) .local(...) 27. ├─formatters::make_row_df(...) 28. └─rtables::make_row_df(...) 29. └─rtables (local) .local(...) 30. ├─formatters::pagdfrow(...) 31. │ └─base::data.frame(...) 32. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 33. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 34. └─rtables (local) .local(x, colwidths, max_width) 35. ├─base::unlist(...) 36. └─base::mapply(...) 37. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 38. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 39. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 40. ├─base::unlist(...) 41. └─base::vapply(...) 42. ├─formatters (local) FUN(X[[i]], ...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─base::vapply(...) 45. └─formatters (local) FUN(X[[i]], ...) 46. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 47. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg02.R:41:3'): fstg02 can handle some NA values in subgroups ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(fstg02, proc_data, dataset = "adtte")) at test-fstg02.R:41:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(fstg02, proc_data, dataset = "adtte") 10. ├─chevron::run(fstg02, proc_data, dataset = "adtte") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. ├─chevron (local) `<fn>`(adam_db = adam_db, dataset = dataset) 14. │ └─basic_table() %>% ... 15. └─tern::tabulate_survival_subgroups(., df, vars = stat_var, time_unit = timeunit) 16. └─rtables::build_table(lyt_survtime, df = df$survtime) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::make_row_df(...) 25. └─rtables::make_row_df(...) 26. └─rtables (local) .local(...) 27. ├─formatters::make_row_df(...) 28. └─rtables::make_row_df(...) 29. └─rtables (local) .local(...) 30. ├─formatters::make_row_df(...) 31. └─rtables::make_row_df(...) 32. └─rtables (local) .local(...) 33. ├─formatters::pagdfrow(...) 34. │ └─base::data.frame(...) 35. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 36. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables (local) .local(x, colwidths, max_width) 38. ├─base::unlist(...) 39. └─base::mapply(...) 40. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 41. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 42. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. ├─base::unlist(...) 44. └─base::vapply(...) 45. ├─formatters (local) FUN(X[[i]], ...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─base::vapply(...) 48. └─formatters (local) FUN(X[[i]], ...) 49. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 50. └─formatters::open_font_dev(fontspec) ── Error ('test-fstg02.R:55:3'): fstg02 can handle customized time units ─────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(fstg02, proc_data, dataset = "adtte")) at test-fstg02.R:55:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(fstg02, proc_data, dataset = "adtte") 10. ├─chevron::run(fstg02, proc_data, dataset = "adtte") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. ├─chevron (local) `<fn>`(adam_db = adam_db, dataset = dataset) 14. │ └─basic_table() %>% ... 15. └─tern::tabulate_survival_subgroups(., df, vars = stat_var, time_unit = timeunit) 16. └─rtables::build_table(lyt_survtime, df = df$survtime) 17. └─rtables::update_ref_indexing(tab) 18. ├─formatters::make_row_df(tt) 19. └─rtables::make_row_df(tt) 20. └─rtables (local) .local(...) 21. ├─formatters::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::make_row_df(...) 25. └─rtables::make_row_df(...) 26. └─rtables (local) .local(...) 27. ├─formatters::make_row_df(...) 28. └─rtables::make_row_df(...) 29. └─rtables (local) .local(...) 30. ├─formatters::make_row_df(...) 31. └─rtables::make_row_df(...) 32. └─rtables (local) .local(...) 33. ├─formatters::pagdfrow(...) 34. │ └─base::data.frame(...) 35. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 36. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables (local) .local(x, colwidths, max_width) 38. ├─base::unlist(...) 39. └─base::mapply(...) 40. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 41. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 42. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. ├─base::unlist(...) 44. └─base::vapply(...) 45. ├─formatters (local) FUN(X[[i]], ...) 46. └─formatters (local) FUN(X[[i]], ...) 47. └─base::vapply(...) 48. └─formatters (local) FUN(X[[i]], ...) 49. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 50. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt01.R:5:3'): lbt01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt01_main(pre_data) at test-lbt01.R:5:3 2. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt01.R:14:3'): lbt01 functions with row_split_var return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt01_main(pre_data, row_split_var = "LBCAT") at test-lbt01.R:14:3 2. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt01.R:26:3'): lbt01 can handle n = 0 and outputs NE instead of infs and NAs ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-lbt01.R:26:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt01, proc_data, precision = list(ALT = 0, CRP = 1)) 10. ├─chevron::run(lbt01, proc_data, precision = list(ALT = 0, CRP = 1)) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, precision = precision) 14. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt04.R:5:3'): lbt04 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt04_main(pre_data) at test-lbt04.R:5:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt04.R:20:3'): lbt04 can handle all NA values ───────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─testthat::expect_snapshot(cat(export_as_txt(res, lpp = 100))) at test-lbt04.R:20:3 2. └─rlang::cnd_signal(state$error) ── Error ('test-lbt04.R:30:3'): lbt04 can handle missing levels ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt04, proc_data)) at test-lbt04.R:30:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt04, proc_data) 10. ├─chevron::run(lbt04, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt04.R:38:3'): lbt04 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt04, proc_data)) at test-lbt04.R:38:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt04, proc_data) 10. ├─chevron::run(lbt04, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt05.R:5:3'): lbt05 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt05_main(pre_data) at test-lbt05.R:5:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt05.R:21:3'): lbt05 give all 0 count if ANRIND are all missing ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(lbt05, proc_data) at test-lbt05.R:21:3 2. ├─chevron::run(lbt05, proc_data) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db) 6. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::pagdfrow(...) 21. │ └─base::data.frame(...) 22. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 23. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 24. └─rtables (local) .local(x, colwidths, max_width) 25. ├─base::unlist(...) 26. └─base::mapply(...) 27. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 28. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 29. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 30. ├─base::unlist(...) 31. └─base::vapply(...) 32. ├─formatters (local) FUN(X[[i]], ...) 33. └─formatters (local) FUN(X[[i]], ...) 34. └─base::vapply(...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 37. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt05.R:35:3'): lbt05 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt05, proc_data)) at test-lbt05.R:35:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt05, proc_data) 10. ├─chevron::run(lbt05, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt06.R:9:3'): lbt06 gives all 0 count if ANRIND and BNRIND are all missing ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt06_main(df_pre) at test-lbt06.R:9:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt06.R:18:3'): lbt06 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt06_main(df_pre) at test-lbt06.R:18:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt07.R:5:3'): lbt07 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt07_main(pre_data) at test-lbt07.R:5:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt07.R:21:3'): lbt07 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt07, proc_data)) at test-lbt07.R:21:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt07, proc_data) 10. ├─chevron::run(lbt07, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:9:3'): lbt14 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt14_main(pre_data) at test-lbt14.R:9:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:16:3'): lbt14 functions with default argument value return expected result with test data when direction = high ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt14_main(pre_data, direction = "high") at test-lbt14.R:16:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:23:3'): lbt14 functions with `gr_missing = excl` return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt14_main(pre_data) at test-lbt14.R:23:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:30:3'): lbt14 functions with `gr_missing = gr_0` return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt14_main(pre_data) at test-lbt14.R:30:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:44:3'): lbt14 can handle all NA values ───────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt14, proc_data)) at test-lbt14.R:44:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt14, proc_data) 10. ├─chevron::run(lbt14, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:63:3'): lbt14 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt14, proc_data)) at test-lbt14.R:63:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt14, proc_data) 10. ├─chevron::run(lbt14, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:68:3'): lbt14 can accept different gr_missing ────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(lbt14, syn_lab, gr_missing = "incl") at test-lbt14.R:68:3 2. ├─chevron::run(lbt14, syn_lab, gr_missing = "incl") 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, gr_missing = gr_missing) 6. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::pagdfrow(...) 27. │ └─base::data.frame(...) 28. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 30. └─rtables (local) .local(x, colwidths, max_width) 31. ├─base::unlist(...) 32. └─base::mapply(...) 33. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 34. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 36. ├─base::unlist(...) 37. └─base::vapply(...) 38. ├─formatters (local) FUN(X[[i]], ...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─base::vapply(...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 43. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:95:3'): lbt14 can handle all NA values with direction = high ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt14, proc_data, direction = "high")) at test-lbt14.R:95:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt14, proc_data, direction = "high") 10. ├─chevron::run(lbt14, proc_data, direction = "high") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, direction = direction) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:114:3'): lbt14 can handle some NA values with direction = high ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt14, proc_data, direction = "high")) at test-lbt14.R:114:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt14, proc_data, direction = "high") 10. ├─chevron::run(lbt14, proc_data, direction = "high") 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db, direction = direction) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt14.R:120:3'): lbt14 can accept different gr_missing with direction = high ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(lbt14, proc_data, gr_missing = "incl", direction = "high") at test-lbt14.R:120:3 2. ├─chevron::run(lbt14, proc_data, gr_missing = "incl", direction = "high") 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, gr_missing = gr_missing, direction = direction) 6. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$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::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::make_row_df(...) 21. └─rtables::make_row_df(...) 22. └─rtables (local) .local(...) 23. ├─formatters::make_row_df(...) 24. └─rtables::make_row_df(...) 25. └─rtables (local) .local(...) 26. ├─formatters::pagdfrow(...) 27. │ └─base::data.frame(...) 28. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 30. └─rtables (local) .local(x, colwidths, max_width) 31. ├─base::unlist(...) 32. └─base::mapply(...) 33. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 34. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 36. ├─base::unlist(...) 37. └─base::vapply(...) 38. ├─formatters (local) FUN(X[[i]], ...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─base::vapply(...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 43. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt15.R:5:3'): lbt15 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::lbt04_main(pre_data) at test-lbt15.R:5:3 2. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt15.R:19:3'): lbt15 can handle all NA values ───────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt15, proc_data)) at test-lbt15.R:19:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt15, proc_data) 10. ├─chevron::run(lbt15, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt15.R:30:3'): lbt15 can handle missing levels ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt15, proc_data)) at test-lbt15.R:30:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt15, proc_data) 10. ├─chevron::run(lbt15, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt15.R:41:3'): lbt15 can handle missing levels in baseline ──── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt15, proc_data)) at test-lbt15.R:41:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt15, proc_data) 10. ├─chevron::run(lbt15, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt15.R:49:3'): lbt15 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt15, proc_data)) at test-lbt15.R:49:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt15, proc_data) 10. ├─chevron::run(lbt15, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-lbt15.R:57:3'): lbt15 can handle some NA values in baseline ──── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(lbt15, proc_data)) at test-lbt15.R:57:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(lbt15, proc_data) 10. ├─chevron::run(lbt15, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adlb, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-mht01.R:5:3'): mht01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::mht01_main(pre_data) at test-mht01.R:5:3 2. └─rtables::build_table(lyt, adam_db$admh, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-mht01.R:14:3'): mht01 works ──────────────────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(mht01, proc_data) at test-mht01.R:14:3 2. ├─chevron::run(mht01, proc_data) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db) 6. └─rtables::build_table(lyt, adam_db$admh, alt_counts_df = adam_db$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(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 21. └─rtables (local) .local(x, colwidths, max_width) 22. ├─base::unlist(...) 23. └─base::mapply(...) 24. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 25. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 27. ├─base::unlist(...) 28. └─base::vapply(...) 29. ├─formatters (local) FUN(X[[i]], ...) 30. └─formatters (local) FUN(X[[i]], ...) 31. └─base::vapply(...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 34. └─formatters::open_font_dev(fontspec) ── Error ('test-mht01.R:20:3'): mht01 works on NULL in lbl_mhbodsys or lbl_mhdecod ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─chevron::run(mht01, proc_data, lbl_mhbodsys = NULL, lbl_mhdecod = NULL) at test-mht01.R:20:3 2. ├─chevron::run(mht01, proc_data, lbl_mhbodsys = NULL, lbl_mhdecod = NULL) 3. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 4. │ └─base::do.call(what, new_args, envir = args_env) 5. └─chevron (local) `<fn>`(adam_db = adam_db, lbl_mhbodsys = lbl_mhbodsys, lbl_mhdecod = lbl_mhdecod) 6. └─rtables::build_table(lyt, adam_db$admh, alt_counts_df = adam_db$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(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 21. └─rtables (local) .local(x, colwidths, max_width) 22. ├─base::unlist(...) 23. └─base::mapply(...) 24. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 25. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 27. ├─base::unlist(...) 28. └─base::vapply(...) 29. ├─formatters (local) FUN(X[[i]], ...) 30. └─formatters (local) FUN(X[[i]], ...) 31. └─base::vapply(...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 34. └─formatters::open_font_dev(fontspec) ── Error ('test-pdt01.R:5:3'): pdt01 function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::pdt01_main(pre_data) at test-pdt01.R:5:3 2. └─rtables::build_table(lyt, adam_db$addv, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-pdt01.R:20:3'): pdt01 can handle all NA values ───────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(pdt01, proc_data)) at test-pdt01.R:20:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(pdt01, proc_data) 10. ├─chevron::run(pdt01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$addv, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-pdt01.R:35:3'): pdt01 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(pdt01, proc_data)) at test-pdt01.R:35:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(pdt01, proc_data) 10. ├─chevron::run(pdt01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$addv, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-pdt02.R:5:3'): pdt02 function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::pdt02_main(pre_data) at test-pdt02.R:5:3 2. └─rtables::build_table(lyt, adam_db$addv, alt_counts_df = adam_db$adsl) 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::make_row_df(...) 11. └─rtables::make_row_df(...) 12. └─rtables (local) .local(...) 13. ├─formatters::pagdfrow(...) 14. │ └─base::data.frame(...) 15. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 16. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 17. └─rtables (local) .local(x, colwidths, max_width) 18. ├─base::unlist(...) 19. └─base::mapply(...) 20. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 21. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 22. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 23. ├─base::unlist(...) 24. └─base::vapply(...) 25. ├─formatters (local) FUN(X[[i]], ...) 26. └─formatters (local) FUN(X[[i]], ...) 27. └─base::vapply(...) 28. └─formatters (local) FUN(X[[i]], ...) 29. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 30. └─formatters::open_font_dev(fontspec) ── Error ('test-pdt02.R:20:3'): pdt02 can handle all NA values ───────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(pdt02, proc_data)) at test-pdt02.R:20:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(pdt02, proc_data) 10. ├─chevron::run(pdt02, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$addv, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-pdt02.R:35:3'): pdt02 can handle some NA values ──────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(pdt02, proc_data)) at test-pdt02.R:35:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(pdt02, proc_data) 10. ├─chevron::run(pdt02, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$addv, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt01.R:5:3'): rmpt01 function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::rmpt01_main(pre_data) at test-rmpt01.R:5:3 2. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 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(tt, colwidths = colwidths, max_width = max_width) 13. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 14. └─rtables (local) .local(x, colwidths, max_width) 15. ├─base::unlist(...) 16. └─base::mapply(...) 17. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 18. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 19. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 20. ├─base::unlist(...) 21. └─base::vapply(...) 22. ├─formatters (local) FUN(X[[i]], ...) 23. └─formatters (local) FUN(X[[i]], ...) 24. └─base::vapply(...) 25. └─formatters (local) FUN(X[[i]], ...) 26. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 27. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt01.R:16:3'): rmpt01 can handle NA values ─────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt01, proc_data)) at test-rmpt01.R:16:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt01, proc_data) 10. ├─chevron::run(rmpt01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt01.R:30:3'): rmpt01 can handle some NA values ────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt01, proc_data)) at test-rmpt01.R:30:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt01, proc_data) 10. ├─chevron::run(rmpt01, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt03.R:8:3'): rmpt03 function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::rmpt03_main(pre_data) at test-rmpt03.R:8:3 2. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 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(tt, colwidths = colwidths, max_width = max_width) 13. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 14. └─rtables (local) .local(x, colwidths, max_width) 15. ├─base::unlist(...) 16. └─base::mapply(...) 17. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 18. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 19. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 20. ├─base::unlist(...) 21. └─base::vapply(...) 22. ├─formatters (local) FUN(X[[i]], ...) 23. └─formatters (local) FUN(X[[i]], ...) 24. └─base::vapply(...) 25. └─formatters (local) FUN(X[[i]], ...) 26. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 27. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt03.R:21:3'): rmpt03 can handle NA values ─────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt03, proc_data)) at test-rmpt03.R:21:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt03, proc_data) 10. ├─chevron::run(rmpt03, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt03.R:37:3'): rmpt03 can handle some NA values ────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt03, proc_data)) at test-rmpt03.R:37:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt03, proc_data) 10. ├─chevron::run(rmpt03, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt04.R:5:3'): rmpt04 function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::rmpt04_main(pre_data) at test-rmpt04.R:5:3 2. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 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(tt, colwidths = colwidths, max_width = max_width) 13. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 14. └─rtables (local) .local(x, colwidths, max_width) 15. ├─base::unlist(...) 16. └─base::mapply(...) 17. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 18. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 19. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 20. ├─base::unlist(...) 21. └─base::vapply(...) 22. ├─formatters (local) FUN(X[[i]], ...) 23. └─formatters (local) FUN(X[[i]], ...) 24. └─base::vapply(...) 25. └─formatters (local) FUN(X[[i]], ...) 26. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 27. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt04.R:16:3'): rmpt04 can handle NA values ─────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt04, proc_data)) at test-rmpt04.R:16:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt04, proc_data) 10. ├─chevron::run(rmpt04, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt04.R:33:3'): rmpt04 can handle some NA values ────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt04, proc_data)) at test-rmpt04.R:33:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt04, proc_data) 10. ├─chevron::run(rmpt04, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt05.R:5:3'): rmpt05 function with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::rmpt05_main(pre_data) at test-rmpt05.R:5:3 2. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 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(tt, colwidths = colwidths, max_width = max_width) 13. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 14. └─rtables (local) .local(x, colwidths, max_width) 15. ├─base::unlist(...) 16. └─base::mapply(...) 17. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 18. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 19. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 20. ├─base::unlist(...) 21. └─base::vapply(...) 22. ├─formatters (local) FUN(X[[i]], ...) 23. └─formatters (local) FUN(X[[i]], ...) 24. └─base::vapply(...) 25. └─formatters (local) FUN(X[[i]], ...) 26. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 27. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt05.R:16:3'): rmpt05 can handle NA values ─────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt05, proc_data)) at test-rmpt05.R:16:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt05, proc_data) 10. ├─chevron::run(rmpt05, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt05.R:33:3'): rmpt05 can handle some NA values ────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt05, proc_data)) at test-rmpt05.R:33:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt05, proc_data) 10. ├─chevron::run(rmpt05, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, adam_db$adex, alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt06.R:4:3'): rmpt06 works as expected ─────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─rmpt06_pre(syn_data) %>% rmpt06_main() %>% rmpt01_post() at test-rmpt06.R:4:3 2. ├─chevron::rmpt01_post(.) 3. │ └─chevron:::std_postprocess(tlg) 4. │ └─chevron::report_null(tlg) 5. │ └─checkmate::assert_true(is.null(tlg) || rtables::is_rtable(tlg)) 6. │ └─checkmate::checkTRUE(x, na.ok) 7. │ └─base::isTRUE(x) 8. └─chevron::rmpt06_main(.) 9. └─rtables::build_table(lyt$adsl, adam_db$adsl) 10. └─rtables::update_ref_indexing(tab) 11. ├─formatters::make_row_df(tt) 12. └─rtables::make_row_df(tt) 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(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 21. └─rtables (local) .local(x, colwidths, max_width) 22. ├─base::unlist(...) 23. └─base::mapply(...) 24. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 25. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 27. ├─base::unlist(...) 28. └─base::vapply(...) 29. ├─formatters (local) FUN(X[[i]], ...) 30. └─formatters (local) FUN(X[[i]], ...) 31. └─base::vapply(...) 32. └─formatters (local) FUN(X[[i]], ...) 33. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 34. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt06.R:12:3'): rmpt06 works as expected with show_diff = TRUE ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─... %>% rmpt01_post() at test-rmpt06.R:12:3 2. ├─chevron::rmpt01_post(.) 3. │ └─chevron:::std_postprocess(tlg) 4. │ └─chevron::report_null(tlg) 5. │ └─checkmate::assert_true(is.null(tlg) || rtables::is_rtable(tlg)) 6. │ └─checkmate::checkTRUE(x, na.ok) 7. │ └─base::isTRUE(x) 8. └─chevron::rmpt06_main(., show_diff = TRUE) 9. └─rtables::build_table(lyt$adsl, adam_db$adsl) 10. └─rtables::update_ref_indexing(tab) 11. ├─formatters::make_row_df(tt) 12. └─rtables::make_row_df(tt) 13. └─rtables (local) .local(...) 14. ├─formatters::make_row_df(...) 15. └─rtables::make_row_df(...) 16. └─rtables (local) .local(...) 17. ├─formatters::make_row_df(...) 18. └─rtables::make_row_df(...) 19. └─rtables (local) .local(...) 20. ├─formatters::pagdfrow(...) 21. │ └─base::data.frame(...) 22. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 23. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 24. └─rtables (local) .local(x, colwidths, max_width) 25. ├─base::unlist(...) 26. └─base::mapply(...) 27. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 28. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 29. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 30. ├─base::unlist(...) 31. └─base::vapply(...) 32. ├─formatters (local) FUN(X[[i]], ...) 33. └─formatters (local) FUN(X[[i]], ...) 34. └─base::vapply(...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 37. └─formatters::open_font_dev(fontspec) ── Error ('test-rmpt06.R:28:3'): rmpt06 can handle all NA values ─────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(rmpt06, proc_data)) at test-rmpt06.R:28:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(rmpt06, proc_data) 10. ├─chevron::run(rmpt06, proc_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt$adsl, adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-rspt01.R:4:3'): rspt01 works as expected ─────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-rspt01.R:4:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. └─chevron::rspt01_main(pre_data, dataset = "adrs", methods = list(diff_pval_method = "fisher")) 10. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 11. └─rtables::update_ref_indexing(tab) 12. ├─formatters::make_row_df(tt) 13. └─rtables::make_row_df(tt) 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::make_row_df(...) 22. └─rtables::make_row_df(...) 23. └─rtables (local) .local(...) 24. ├─formatters::pagdfrow(...) 25. │ └─base::data.frame(...) 26. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 27. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables (local) .local(x, colwidths, max_width) 29. ├─base::unlist(...) 30. └─base::mapply(...) 31. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 32. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 33. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. ├─base::unlist(...) 35. └─base::vapply(...) 36. ├─formatters (local) FUN(X[[i]], ...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─base::vapply(...) 39. └─formatters (local) FUN(X[[i]], ...) 40. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 41. └─formatters::open_font_dev(fontspec) ── Error ('test-rspt01.R:10:3'): rspt01 works as expected for stratified and unstratified analysis ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-rspt01.R:10:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-rspt01.R:30:3'): rspt01 works as expected for unstratified analysis only ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-rspt01.R:30:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-rspt01.R:48:3'): rspt01 works as expected for stratified analysis only ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-rspt01.R:48:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-rspt01.R:68:3'): rspt01 works if change reference group ──────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-rspt01.R:68:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-rspt01.R:88:3'): rspt01 works if change statistic methods ────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-rspt01.R:88:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-rspt01.R:117:3'): rspt01 works if change confidence interval ─── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-rspt01.R:117:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::pagdfrow(...) 29. │ └─base::data.frame(...) 30. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 31. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 32. └─rtables (local) .local(x, colwidths, max_width) 33. ├─base::unlist(...) 34. └─base::mapply(...) 35. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 36. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 37. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 38. ├─base::unlist(...) 39. └─base::vapply(...) 40. ├─formatters (local) FUN(X[[i]], ...) 41. └─formatters (local) FUN(X[[i]], ...) 42. └─base::vapply(...) 43. └─formatters (local) FUN(X[[i]], ...) 44. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 45. └─formatters::open_font_dev(fontspec) ── Error ('test-ttet01.R:4:3'): ttet01 works as expected ─────────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-ttet01.R:4:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. └─chevron::ttet01_main(...) 10. └─rtables::build_table(lyt, anl) 11. └─rtables::update_ref_indexing(tab) 12. ├─formatters::make_row_df(tt) 13. └─rtables::make_row_df(tt) 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(tt, colwidths = colwidths, max_width = max_width) 24. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables (local) .local(x, colwidths, max_width) 26. ├─base::unlist(...) 27. └─base::mapply(...) 28. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 29. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 30. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. ├─base::unlist(...) 32. └─base::vapply(...) 33. ├─formatters (local) FUN(X[[i]], ...) 34. └─formatters (local) FUN(X[[i]], ...) 35. └─base::vapply(...) 36. └─formatters (local) FUN(X[[i]], ...) 37. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 38. └─formatters::open_font_dev(fontspec) ── Error ('test-ttet01.R:15:3'): ttet01 works as expected for stratified and unstratified analysis ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-ttet01.R:15:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, anl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-ttet01.R:36:3'): ttet01 works as expected for stratified analysis only ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-ttet01.R:36:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, anl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-ttet01.R:58:3'): ttet01 works if change reference group ──────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-ttet01.R:58:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(...) 10. ├─chevron::run(...) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(...) 14. └─rtables::build_table(lyt, anl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::pagdfrow(...) 26. │ └─base::data.frame(...) 27. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 28. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 29. └─rtables (local) .local(x, colwidths, max_width) 30. ├─base::unlist(...) 31. └─base::mapply(...) 32. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 33. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 34. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 35. ├─base::unlist(...) 36. └─base::vapply(...) 37. ├─formatters (local) FUN(X[[i]], ...) 38. └─formatters (local) FUN(X[[i]], ...) 39. └─base::vapply(...) 40. └─formatters (local) FUN(X[[i]], ...) 41. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 42. └─formatters::open_font_dev(fontspec) ── Error ('test-vst01.R:5:3'): vst01 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::vst01_main(pre_data) at test-vst01.R:5:3 2. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 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::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::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::pagdfrow(...) 23. │ └─base::data.frame(...) 24. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 25. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 26. └─rtables (local) .local(x, colwidths, max_width) 27. ├─base::unlist(...) 28. └─base::mapply(...) 29. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 30. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 31. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 32. ├─base::unlist(...) 33. └─base::vapply(...) 34. ├─formatters (local) FUN(X[[i]], ...) 35. └─formatters (local) FUN(X[[i]], ...) 36. └─base::vapply(...) 37. └─formatters (local) FUN(X[[i]], ...) 38. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 39. └─formatters::open_font_dev(fontspec) ── Error ('test-vst01.R:13:3'): run vst01 works as expected ──────────────────── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. ├─testthat::expect_silent(run(vst01, syn_data)) at test-vst01.R:13:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. ├─chevron::run(vst01, syn_data) 10. ├─chevron::run(vst01, syn_data) 11. │ └─chevron:::do_call(object@main, c(proc_data, user_args)) 12. │ └─base::do.call(what, new_args, envir = args_env) 13. └─chevron (local) `<fn>`(adam_db = adam_db) 14. └─rtables::build_table(lyt, df = adam_db[[dataset]], alt_counts_df = adam_db$adsl) 15. └─rtables::update_ref_indexing(tab) 16. ├─formatters::make_row_df(tt) 17. └─rtables::make_row_df(tt) 18. └─rtables (local) .local(...) 19. ├─formatters::make_row_df(...) 20. └─rtables::make_row_df(...) 21. └─rtables (local) .local(...) 22. ├─formatters::make_row_df(...) 23. └─rtables::make_row_df(...) 24. └─rtables (local) .local(...) 25. ├─formatters::make_row_df(...) 26. └─rtables::make_row_df(...) 27. └─rtables (local) .local(...) 28. ├─formatters::make_row_df(...) 29. └─rtables::make_row_df(...) 30. └─rtables (local) .local(...) 31. ├─formatters::make_row_df(...) 32. └─rtables::make_row_df(...) 33. └─rtables (local) .local(...) 34. ├─formatters::pagdfrow(...) 35. │ └─base::data.frame(...) 36. ├─formatters::nlines(tt, colwidths = colwidths, max_width = max_width) 37. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 38. └─rtables (local) .local(x, colwidths, max_width) 39. ├─base::unlist(...) 40. └─base::mapply(...) 41. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 42. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 43. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 44. ├─base::unlist(...) 45. └─base::vapply(...) 46. ├─formatters (local) FUN(X[[i]], ...) 47. └─formatters (local) FUN(X[[i]], ...) 48. └─base::vapply(...) 49. └─formatters (local) FUN(X[[i]], ...) 50. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 51. └─formatters::open_font_dev(fontspec) ── Error ('test-vst02.R:5:3'): vst02 functions with default argument value return expected result with test data ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::vst02_1_main(pre_data) at test-vst02.R:5:3 2. └─rtables::build_table(lyt, adam_db$advs, alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) ── Error ('test-vst02.R:12:3'): vst02 functions return expected result with test data when excluding subject with baseline abnormality ── Error in `nlines(strsplit(s, "\n", fixed = TRUE), max_width = w)`: argument "fontspec" is missing, with no default Backtrace: ▆ 1. └─chevron::vst02_2_main(pre_data) at test-vst02.R:12:3 2. └─rtables::build_table(lyt, adam_db$advs, alt_counts_df = adam_db$adsl) 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::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(tt, colwidths = colwidths, max_width = max_width) 19. └─rtables::nlines(tt, colwidths = colwidths, max_width = max_width) 20. └─rtables (local) .local(x, colwidths, max_width) 21. ├─base::unlist(...) 22. └─base::mapply(...) 23. └─rtables (local) `<fn>`(s = dots[[1L]][[1L]], w = dots[[2L]][[1L]]) 24. ├─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 25. └─formatters::nlines(strsplit(s, "\n", fixed = TRUE), max_width = w) 26. ├─base::unlist(...) 27. └─base::vapply(...) 28. ├─formatters (local) FUN(X[[i]], ...) 29. └─formatters (local) FUN(X[[i]], ...) 30. └─base::vapply(...) 31. └─formatters (local) FUN(X[[i]], ...) 32. └─formatters::wrap_txt(xi, max_width, fontspec = fontspec) 33. └─formatters::open_font_dev(fontspec) [ FAIL 171 | WARN 0 | SKIP 11 | PASS 169 ] Deleting unused snapshots: • mng01/run-mng01-with-custom-unnamed-color-set.svg Error: Test failures Execution halted Flavor: r-devel-linux-x86_64-debian-gcc

Version: 0.2.6
Check: re-building of vignette outputs
Result: ERROR Error(s) in re-building vignettes: ... --- re-building ‘chevron.Rmd’ using rmarkdown Quitting from lines 85-86 [unnamed-chunk-3] (chevron.Rmd) Error: processing vignette 'chevron.Rmd' failed with diagnostics: argument "fontspec" is missing, with no default --- failed re-building ‘chevron.Rmd’ --- re-building ‘chevron_catalog.rmd’ using rmarkdown Quitting from lines 65-67 [unnamed-chunk-5] (chevron_catalog.rmd) Error: processing vignette 'chevron_catalog.rmd' failed with diagnostics: argument "fontspec" is missing, with no default --- failed re-building ‘chevron_catalog.rmd’ --- re-building ‘script_generator.Rmd’ using rmarkdown --- finished re-building ‘script_generator.Rmd’ SUMMARY: processing the following files failed: ‘chevron.Rmd’ ‘chevron_catalog.rmd’ Error: Vignette re-building failed. Execution halted Flavor: r-devel-linux-x86_64-debian-gcc