<rlib_error_package_not_found/rlang_error/error/condition>
Error in `expect_vector(predict(div_modelnoW, Xtest = matrix(rnorm(40, 
    mean = 2), ncol = 1)), size = 40)`: The package "vctrs" is required.

div_modelW <- div(Z = as.matrix(rnorm(100)),
div_modelnoW <- div(Z = as.matrix(rnorm(100)),
test_that("Error if Xtest contains another # vars than Xtrain", {
expect_error(predict(div_modelnoW, Xtest = matrix(rnorm(40, mean = 2), ncol = 2)))
test_that("Vector of mean values of proper length returned", {
expect_vector(predict(div_modelnoW, Xtest = matrix(rnorm(40, mean = 2), ncol = 1)),
test_that("Matrix of sampled values of proper dimension returned", {
expect_matrix(predict(div_modelnoW, Xtest = matrix(rnorm(40, mean = 2), ncol = 1),
test_that("Matrix of quantile values of proper dimension returned", {
test_that("Vector of quantile values of proper length returned", {
expect_vector(predict(div_modelnoW, Xtest = matrix(rnorm(40, mean = 2), ncol = 1),
type = "quantile", nsample = 200, quantiles = 0.05),
test_that("Warning about conditional effects", {
test_that("Error because of different lengths", {
expect_error(predict.DIV(div_modelW, Xtest = rnorm(10), Wtest = rnorm(20)))

"Error if Xtest contains another # vars than Xtrain"
"Vector of mean values of proper length returned"
"Matrix of sampled values of proper dimension returned"
"Matrix of quantile values of proper dimension returned"
"Vector of quantile values of proper length returned"

Vector of mean values of proper length returned

<rlib_error_package_not_found/rlang_error/error/condition>
Error in `expect_vector(predict(div_modelnoW, Xtest = matrix(rnorm(40, 
    mean = 2), ncol = 1), type = "quantile", nsample = 200, quantiles = 0.05), 
    size = 40)`: The package "vctrs" is required.

Vector of quantile values of proper length returned