Package check result: OK

Changes to worse in reverse depends:

Package: VsusP
Check: examples
New result: ERROR
  Running examples in ‘VsusP-Ex.R’ failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### Name: Sequential2Means
  > ### Title: Variable selection using shrinkage priors :: Sequential2Means
  > ### Aliases: Sequential2Means
  > 
  > ### ** Examples
  > 
  > # -----------------------------------------------------------------
  > # Example 1: Gaussian Model and Horseshoe prior
  > n <- 10
  > p <- 5
  > X <- matrix(rnorm(n * p), n, p)
  > beta <- exp(rnorm(p))
  > Y <- as.vector(X %*% beta + rnorm(n, 0, 1))
  > b.i <- seq(0, 1, 0.05)
  > 
  > # Sequential2Means with horseshoe+ using gibbs sampling
  > # recommended n.samples is 5000 and burning is 2000
  > S2M <- Sequential2Means(X, Y, b.i, "horseshoe+", 110, 100)
  Error in Beta[i, ] : subscript out of bounds
  Calls: Sequential2Means -> numNoiseCoeff -> <Anonymous> -> as.matrix
  Execution halted

Package: VsusP
Check: re-building of vignette outputs
New result: ERROR
  Error(s) in re-building vignettes:
    ...
  --- re-building ‘VsusPVignette.Rmd’ using rmarkdown
  
  Quitting from lines 138-143 [s2m-apply] (VsusPVignette.Rmd)
  Error: processing vignette 'VsusPVignette.Rmd' failed with diagnostics:
  subscript out of bounds
  --- failed re-building ‘VsusPVignette.Rmd’
  
  SUMMARY: processing the following file failed:
    ‘VsusPVignette.Rmd’
  
  Error: Vignette re-building failed.
  Execution halted

Package: VsusP
Check: tests
New result: ERROR
    Running ‘testthat.R’ [1s/2s]
  Running the tests in ‘tests/testthat.R’ failed.
  Complete output:
    > # 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/tests.html
    > # * https://testthat.r-lib.org/reference/test_package.html#special-files
    > 
    > library(testthat)
    > library(VsusP)
    > 
    > test_check("VsusP")
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 28 ]
    
    ══ Failed tests ════════════════════════════════════════════════════════════════
    ── Error ('test-Sequential2Means.R:58:3'): Sequential2Means works ──────────────
    <subscriptOutOfBoundsError/error/condition>
    Error in `Beta[i, ]`: subscript out of bounds
    Backtrace:
        ▆
     1. ├─testthat::expect_length(...) at test-Sequential2Means.R:58:3
     2. │ └─testthat::quasi_label(enquo(object), arg = "object")
     3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
     4. └─VsusP::Sequential2Means(X, Y, b.i, "ridge", 200, 100)
     5.   └─VsusP:::numNoiseCoeff(Beta[i, ], b.i[r])
     6.     └─stats::kmeans(abs(Beta.i), 2)
     7.       └─base::as.matrix(x)
    
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 28 ]
    Error: Test failures
    Execution halted