R Under development (unstable) (2025-09-02 r88773 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(seminrExtras)
> test_check("seminrExtras")
Generating the seminr model
All 344 observations are valid.
Generating the seminr model
All 344 observations are valid.
[ FAIL 1 | WARN 0 | SKIP 0 | PASS 0 ]

══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-cvpat.R:38:1'): (code run outside of `test_that()`) ────────────
Error in `array(x, c(length(x), 1L), if (!is.null(names(x))) list(names(x), 
    NULL) else NULL)`: 'data' must be of a vector type, was 'NULL'
Backtrace:
    ▆
 1. └─seminrExtras::assess_cvpat_compare(...) at test-cvpat.R:38:1
 2.   ├─base::as.matrix(pls_predict_model_one$items$PLS_out_of_sample_residuals)
 3.   └─base::as.matrix.default(pls_predict_model_one$items$PLS_out_of_sample_residuals)
 4.     └─base::array(...)

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