R Under development (unstable) (2024-12-10 r87437 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2024 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.

> library(testthat)
> library(SLOS)
> 
> test_check("SLOS")
[ FAIL 4 | WARN 0 | SKIP 0 | PASS 0 ]

══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-Evaluation.R:5:3'): SLOS generates expected outputs ────────────
<packageNotFoundError/error/condition>
Error in `library(png)`: there is no package called 'png'
Backtrace:
    ▆
 1. ├─base::suppressWarnings(SLOS::SLOS(mock_data)) at test-Evaluation.R:5:3
 2. │ └─base::withCallingHandlers(...)
 3. └─SLOS::SLOS(mock_data)
 4.   └─base::library(png)
── Failure ('test-Evaluation.R:15:3'): SLOS handles empty or invalid data ──────
`SLOS(data.frame())` threw an error with unexpected message.
Expected match: "Error: Input data must contain at least one row."
Actual message: "there is no package called 'png'"
Backtrace:
    ▆
 1. ├─testthat::expect_error(SLOS(data.frame()), "Error: Input data must contain at least one row.") at test-Evaluation.R:15:3
 2. │ └─testthat:::quasi_capture(...)
 3. │   ├─testthat (local) .capture(...)
 4. │   │ └─base::withCallingHandlers(...)
 5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
 6. └─SLOS::SLOS(data.frame())
 7.   └─base::library(png)
── Failure ('test-Evaluation.R:18:3'): SLOS handles empty or invalid data ──────
`SLOS(invalid_data)` threw an error with unexpected message.
Expected match: "Error: Missing required columns: UnitCode, UnitLengthStay_trunc"
Actual message: "there is no package called 'png'"
Backtrace:
    ▆
 1. ├─testthat::expect_error(SLOS(invalid_data), "Error: Missing required columns: UnitCode, UnitLengthStay_trunc") at test-Evaluation.R:18:3
 2. │ └─testthat:::quasi_capture(...)
 3. │   ├─testthat (local) .capture(...)
 4. │   │ └─base::withCallingHandlers(...)
 5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
 6. └─SLOS::SLOS(invalid_data)
 7.   └─base::library(png)
── Error ('test-Prediction.R:3:3'): predict_and_evaluate works as expected ─────
<packageNotFoundError/error/condition>
Error in `library(ranger)`: there is no package called 'ranger'
Backtrace:
    ▆
 1. └─SLOS::predict_and_evaluate(sampled_data) at test-Prediction.R:3:3
 2.   └─base::library(ranger)

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