Running ‘testthat.R’ [65s/87s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tfrmt)
  > 
  > test_check("tfrmt")
  Writing json file out to:
  test.json
  The following rows of the given dataset have no format applied to them 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36
  The following rows of the given dataset have no format applied to them 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12
  [ FAIL 4 | WARN 3 | SKIP 32 | PASS 600 ]
  
  ══ Skipped tests (32) ══════════════════════════════════════════════════════════
  • On CRAN (32): 'test-JSON.R:4:3', 'test-JSON.R:39:3', 'test-JSON.R:58:3',
    'test-JSON.R:94:3', 'test-JSON.R:294:3', 'test-JSON.R:313:3',
    'test-JSON.R:372:3', 'test-JSON.R:472:3', 'test-JSON.R:504:3',
    'test-make_mock_data.R:226:3', 'test-prep_card.R:245:3',
    'test-prep_card.R:446:3', 'test-prep_card.R:485:3', 'test-prep_card.R:516:3',
    'test-prep_card.R:549:3', 'test-prep_card.R:568:3', 'test-prep_card.R:587:3',
    'test-prep_card.R:635:3', 'test-prep_card.R:667:3', 'test-prep_card.R:682:3',
    'test-prep_card.R:718:3', 'test-prep_card.R:736:3', 'test-prep_card.R:774:3',
    'test-prep_card.R:924:3', 'test-prep_card.R:949:3', 'test-prep_card.R:975:3',
    'test-prep_card.R:1046:3', 'test-shuffle_card.R:9:3',
    'test-shuffle_card.R:68:3', 'test-shuffle_card.R:79:3',
    'test-shuffle_card.R:245:3', 'test-shuffle_card.R:411:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-col_plan.R:1386:3'): Tidyselect subtraction with span_structure ──
  Error in `gt(., rowname_col = as_label(tfrmt$label))`: The column(s) "label" specified in `rowname_col` do not exist in the data.
  * Available columns are: "Treatment___tlang_delim___T1", "Treatment___tlang_delim___T2", "Treatment___tlang_delim___T1&T2", "Placebo___tlang_delim___PL", and "..tfrmt_row_grp_lbl"
  Backtrace:
       ▆
    1. ├─tfrmt_minus_selection_2 %>% print_mock_gt(df) at test-col_plan.R:1386:3
    2. ├─tfrmt::print_mock_gt(., df)
    3. │ └─apply_tfrmt(.data, tfrmt, mock = TRUE) %>% ...
    4. ├─tfrmt::cleaned_data_to_gt(., tfrmt, .unicode_ws)
    5. ├─tfrmt:::cleaned_data_to_gt.default(., tfrmt, .unicode_ws)
    6. │ └─... %>% ...
    7. ├─gt::tab_style(...)
    8. │ └─gt:::stop_if_not_gt_tbl(data = data)
    9. │   └─gt:::is_gt_tbl(data = data)
   10. ├─tfrmt:::format_gt_column_labels(., .data)
   11. │ └─gt_table %>% ...
   12. ├─gt::tab_spanner(., md(spans_to_apply$value[i]), columns = all_of(spans_to_apply$set[[i]]))
   13. │ └─gt:::stop_if_not_gt_tbl(data = data)
   14. │   └─gt:::is_gt_tbl(data = data)
   15. ├─gt::cols_hide(., columns = "..tfrmt_row_grp_lbl")
   16. │ └─gt:::stop_if_not_gt_tbl_or_group(data = data)
   17. │   └─gt:::is_gt_tbl_or_group(data)
   18. ├─gt::sub_missing(...)
   19. │ └─gt:::stop_if_not_gt_tbl(data = data)
   20. │   └─gt:::is_gt_tbl(data = data)
   21. └─gt::gt(., rowname_col = as_label(tfrmt$label))
   22.   └─cli::cli_abort(...)
   23.     └─rlang::abort(...)
  ── Error ('test-make_mock_data.R:498:3'): Mock data can be made and printed without label ──
  Error in `gt(., rowname_col = as_label(tfrmt$label))`: The column(s) "<empty>" specified in `rowname_col` do not exist in the data.
  * Available columns are: "column1", "column2", "column3", and "..tfrmt_row_grp_lbl"
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(print_mock_gt(plan, .data = dat)) at test-make_mock_data.R:498: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. ├─tfrmt::print_mock_gt(plan, .data = dat)
   10. │ └─apply_tfrmt(.data, tfrmt, mock = TRUE) %>% ...
   11. ├─tfrmt::cleaned_data_to_gt(., tfrmt, .unicode_ws)
   12. ├─tfrmt:::cleaned_data_to_gt.default(., tfrmt, .unicode_ws)
   13. │ └─... %>% ...
   14. ├─gt::tab_style(...)
   15. │ └─gt:::stop_if_not_gt_tbl(data = data)
   16. │   └─gt:::is_gt_tbl(data = data)
   17. ├─tfrmt:::format_gt_column_labels(., .data)
   18. │ └─gt_table %>% cols_label(.list = lapply(renm_vals, md))
   19. ├─gt::cols_label(., .list = lapply(renm_vals, md))
   20. │ └─gt:::stop_if_not_gt_tbl_or_group(data = .data)
   21. │   └─gt:::is_gt_tbl_or_group(data)
   22. ├─gt::cols_hide(., columns = "..tfrmt_row_grp_lbl")
   23. │ └─gt:::stop_if_not_gt_tbl_or_group(data = data)
   24. │   └─gt:::is_gt_tbl_or_group(data)
   25. ├─gt::sub_missing(...)
   26. │ └─gt:::stop_if_not_gt_tbl(data = data)
   27. │   └─gt:::is_gt_tbl(data = data)
   28. └─gt::gt(., rowname_col = as_label(tfrmt$label))
   29.   └─cli::cli_abort(...)
   30.     └─rlang::abort(...)
  ── Error ('test-make_mock_data.R:515:3'): Mock data can be printed from a tfrmt without a body plan ──
  Error in `gt(., rowname_col = as_label(tfrmt$label))`: The column(s) "<empty>" specified in `rowname_col` do not exist in the data.
  * Available columns are: "column1", "column2", "column3", and "..tfrmt_row_grp_lbl"
  Backtrace:
       ▆
    1. ├─tfrmt::print_mock_gt(plan) at test-make_mock_data.R:515:3
    2. │ └─apply_tfrmt(.data, tfrmt, mock = TRUE) %>% ...
    3. ├─tfrmt::cleaned_data_to_gt(., tfrmt, .unicode_ws)
    4. ├─tfrmt:::cleaned_data_to_gt.default(., tfrmt, .unicode_ws)
    5. │ └─... %>% ...
    6. ├─gt::tab_style(...)
    7. │ └─gt:::stop_if_not_gt_tbl(data = data)
    8. │   └─gt:::is_gt_tbl(data = data)
    9. ├─tfrmt:::format_gt_column_labels(., .data)
   10. │ └─gt_table %>% cols_label(.list = lapply(renm_vals, md))
   11. ├─gt::cols_label(., .list = lapply(renm_vals, md))
   12. │ └─gt:::stop_if_not_gt_tbl_or_group(data = .data)
   13. │   └─gt:::is_gt_tbl_or_group(data)
   14. ├─gt::cols_hide(., columns = "..tfrmt_row_grp_lbl")
   15. │ └─gt:::stop_if_not_gt_tbl_or_group(data = data)
   16. │   └─gt:::is_gt_tbl_or_group(data)
   17. ├─gt::sub_missing(...)
   18. │ └─gt:::stop_if_not_gt_tbl(data = data)
   19. │   └─gt:::is_gt_tbl(data = data)
   20. └─gt::gt(., rowname_col = as_label(tfrmt$label))
   21.   └─cli::cli_abort(...)
   22.     └─rlang::abort(...)
  ── Error ('test-mrkdown_labels.R:83:3'): markdown column labels - spanning ─────
  Error in `gt(., rowname_col = as_label(tfrmt$label))`: The column(s) "<empty>" specified in `rowname_col` do not exist in the data.
  * Available columns are: "Pooled Id", "Site Id", "Placebo (N=86)___tlang_delim___ITT </br> (N=10)", "Placebo (N=86)___tlang_delim___Eff", "Placebo (N=86)___tlang_delim___Com", "Total (N=254)___tlang_delim___ITT </br> (N=10)", "Total (N=254)___tlang_delim___Eff", "Total (N=254)___tlang_delim___Com", "Xanomeline High Dose (N=84)___tlang_delim___ITT </br> (N=10)", "Xanomeline High Dose (N=84)___tlang_delim___Eff", "Xanomeline High Dose (N=84)___tlang_delim___Com", "Xanomeline Low Dose <br /> (N=84)___tlang_delim___ITT </br> (N=10)", "Xanomeline Low Dose <br /> (N=84)___tlang_delim___Eff", "Xanomeline Low Dose <br /> (N=84)___tlang_delim___Com", and "..tfrmt_row_grp_lbl"
  Backtrace:
       ▆
    1. ├─... %>% print_to_gt(mock_data) at test-mrkdown_labels.R:83:3
    2. ├─tfrmt::print_to_gt(., mock_data)
    3. │ └─apply_tfrmt(.data, tfrmt, mock = FALSE) %>% ...
    4. ├─tfrmt::cleaned_data_to_gt(., tfrmt, .unicode_ws)
    5. ├─tfrmt:::cleaned_data_to_gt.default(., tfrmt, .unicode_ws)
    6. │ └─... %>% ...
    7. ├─gt::tab_style(...)
    8. │ └─gt:::stop_if_not_gt_tbl(data = data)
    9. │   └─gt:::is_gt_tbl(data = data)
   10. ├─tfrmt:::format_gt_column_labels(., .data)
   11. │ └─gt_table %>% ...
   12. ├─gt::tab_spanner(., md(spans_to_apply$value[i]), columns = all_of(spans_to_apply$set[[i]]))
   13. │ └─gt:::stop_if_not_gt_tbl(data = data)
   14. │   └─gt:::is_gt_tbl(data = data)
   15. ├─gt::cols_hide(., columns = "..tfrmt_row_grp_lbl")
   16. │ └─gt:::stop_if_not_gt_tbl_or_group(data = data)
   17. │   └─gt:::is_gt_tbl_or_group(data)
   18. ├─gt::sub_missing(...)
   19. │ └─gt:::stop_if_not_gt_tbl(data = data)
   20. │   └─gt:::is_gt_tbl(data = data)
   21. └─gt::gt(., rowname_col = as_label(tfrmt$label))
   22.   └─cli::cli_abort(...)
   23.     └─rlang::abort(...)
  
  [ FAIL 4 | WARN 3 | SKIP 32 | PASS 600 ]
  Error: Test failures
  Execution halted