Package check result: OK

Changes to worse in reverse depends:

Package: rvinecopulib
Check: tests
New result: ERROR
    Running ‘testthat.R’ [5s/5s]
  Running the tests in ‘tests/testthat.R’ failed.
  Complete output:
    > library(testthat)
    > library(rvinecopulib)
    > 
    > 
    > test_check("rvinecopulib")
    [ FAIL 2 | WARN 0 | SKIP 0 | PASS 302 ]
    
    ══ Failed tests ════════════════════════════════════════════════════════════════
    ── Error ('test_discrete.R:95:3'): vine works ──────────────────────────────────
    Error in `levels(obj$x)[q + 1]`: only 0's may be mixed with negative subscripts
    Backtrace:
        ▆
     1. └─rvinecopulib::rvine(n * 10, fit) at test_discrete.R:95:3
     2.   └─rvinecopulib:::dpq_marg(U, vine, "q")
     3.     └─base::lapply(...)
     4.       └─rvinecopulib (local) FUN(X[[i]], ...)
     5.         └─rvinecopulib:::eval_one_dpq(x[, i], vine$margins[[i]], what)
     6.           └─kde1d::qkde1d(x, margin)
     7.             └─base::ordered(levels(obj$x)[q + 1], levels(obj$x))
     8.               └─base::factor(x, ..., ordered = TRUE)
    ── Failure ('test_vine.R:57:3'): margins_controls works ────────────────────────
    sapply(fit_mult$margins, "[[", "bw") not equal to 2/log(6) * sapply(fit$margins, "[[", "bw").
    5/5 mismatches (average diff: 0.112)
    [1] 0.799 - 0.892 == -0.0929
    [2] 1.073 - 1.198 == -0.1247
    [3] 0.711 - 0.794 == -0.0827
    [4] 1.158 - 1.293 == -0.1346
    [5] 1.060 - 1.183 == -0.1231
    Backtrace:
        ▆
     1. └─rvinecopulib (local) expect_eql(...) at test_vine.R:57:3
     2.   └─testthat::expect_equal(..., check.environment = FALSE) at test_vine.R:2:15
    
    [ FAIL 2 | WARN 0 | SKIP 0 | PASS 302 ]
    Error: Test failures
    Execution halted

Package: vinereg
Check: tests
New result: ERROR
    Running ‘testthat.R’ [3s/3s]
  Running the tests in ‘tests/testthat.R’ failed.
  Complete output:
    > library(vinereg)
    > 
    > if (require(testthat)) test_check("vinereg")
    Loading required package: testthat
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 61 ]
    
    ══ Failed tests ════════════════════════════════════════════════════════════════
    ── Failure ('test-test-cpit.R:76:3'): works with continuous response ───────────
    cll(fit, dat) not equal to fit$stats$cll.
    1/1 mismatches
    [1] 4.65 - 6.54 == -1.89
    
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 61 ]
    Error: Test failures
    Execution halted