R Under development (unstable) (2025-12-07 r89119 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2025 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> # 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/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
> 
> library(testthat)
> library(plotor)
> 
> test_check("plotor")
Saving _problems/test-plot_or-119.R
Saving _problems/test-plot_or-133.R
[ FAIL 4 | WARN 0 | SKIP 0 | PASS 62 ]

══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-plot_or.R:97:3'): `table_or()` and `plot_or()` handle issues gracefully ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `dplyr::mutate(medicaldata::strep_tb, arm = forcats::fct(as.character(arm), levels = c("Control", "Streptomycin")), dose_strep_g = as.numeric(dose_strep_g), dose_PAS_g = as.numeric(dose_PAS_g), gender = forcats::fct_infreq(gender), baseline_condition = forcats::fct(as.character(baseline_condition), levels = c("1_Good", "2_Fair", "3_Poor")), baseline_temp = forcats::fct(dplyr::case_match(baseline_temp, "1_<=98.9F/37.2C" ~ "<= 37.2C", "2_99-99.9F/37.3-37.7C" ~ "37.3 - 37.7C", "2_99-99.9F/37.3-37.7C/37.3-37.7C" ~      "37.3 - 37.7C", "3_100-100.9F/37.8-38.2C" ~ "37.8 - 38.2C", "3_100-100.9F/37.8-38.2C/37.8-38.2C" ~ "37.8 - 38.2C", "4_>=101F/38.3C" ~ ">= 38.3C"), levels = c("<= 37.2C", "37.3 - 37.7C", "37.8 - 38.2C", ">= 38.3C")), baseline_esr = forcats::fct_na_value_to_level(forcats::fct(dplyr::case_match(baseline_esr, "2_11-20" ~ "11-20", "3_21-50" ~ "21-50", "4_51+" ~ "51+", "<NA>" ~ NA), levels = c("11-20", "21-50", "51+")), level = "NA"), baseline_cavitation = forcats::fct(baseline_cavitation, levels = c("no",      "yes")), radiologic_6m = forcats::fct(radiologic_6m, levels = c("1_Death", "2_Considerable_deterioration", "3_Moderate_deterioration", "4_No_change", "5_Moderate_improvement", "6_Considerable_improvement")))`: i In argument: `baseline_temp = forcats::fct(...)`.
Caused by error in `dplyr::case_match()`:
! Can't convert from `..1 (left)` <character> to <factor<ae9a9>> due to loss of generality.
* Locations: 1
── Failure ('test-plot_or.R:117:3'): `assumption_checks` parameter works as expected ──
Expected `{ ... }` not to throw any errors.
Actually got a <simpleError> with message:
  'diabetes' is not an exported object from 'namespace:medicaldata'
── Error ('test-plot_or.R:122:3'): `assumption_checks` parameter works as expected ──
Error in `eval(code, test_env)`: object 'list_models' not found
Backtrace:
    ▆
 1. └─purrr::walk(...) at test-plot_or.R:122:3
 2.   └─purrr::map(.x, .f, ..., .progress = .progress)
 3.     └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
 4.       └─purrr:::vctrs_vec_compat(.x, .purrr_user_env)
── Error ('test-plot_or.R:289:5'): `assumption_sample_size()` works as expected ──
Error: 'diabetes' is not an exported object from 'namespace:medicaldata'
Backtrace:
     ▆
  1. ├─testthat::expect_silent(...) at test-plot_or.R:288: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. └─plotor:::get_lr_diabetes() at test-plot_or.R:289:5
 10.   └─plotor:::get_df_diabetes() at ./helper_generate_data.R:513:3
 11.     └─janitor::clean_names(medicaldata::diabetes) at ./helper_generate_data.R:144:3

[ FAIL 4 | WARN 0 | SKIP 0 | PASS 62 ]
Error:
! Test failures.
Execution halted