Package check result: OK

Changes to worse in reverse depends:

Package: mcmcsae
Check: examples
New result: ERROR
  Running examples in ‘mcmcsae-Ex.R’ failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### Name: brt
  > ### Title: Create a model component object for a BART (Bayesian Additive
  > ###   Regression Trees) component in the linear predictor
  > ### Aliases: brt
  > 
  > ### ** Examples
  > 
  > # generate data, based on an example in Friedman (1991)
  > gendat <- function(n=200L, p=10L, sigma=1) {
  +   x <- matrix(runif(n * p), n, p)
  +   mu <- 10*sin(pi*x[, 1] * x[, 2]) + 20*(x[, 3] - 0.5)^2 + 10*x[, 4] + 5*x[, 5]
  +   y <- mu + sigma * rnorm(n)
  +   data.frame(x=x, mu=mu, y=y)
  + }
  > 
  > train <- gendat()
  > test <- gendat(n=25)
  > 
  > # keep trees for later prediction based on new data
  > sampler <- create_sampler(
  +   y ~ brt(~ . - y, name="bart", keepTrees=TRUE),
  +   sigma.mod=pr_invchisq(df=3,  scale=var(train$y)),
  +   data = train
  + )
  > sim <- MCMCsim(sampler, n.chain=2, n.iter=700, thin=2,
  +   store.all=TRUE, verbose=FALSE)
  Error in p[[name_sampler]]$run(0L, 1L, FALSE) : 
    number of threads must be greater than or equal to 1
  Calls: MCMCsim -> <Anonymous> -> <Anonymous> -> <Anonymous> -> .Call
  Execution halted

Package: mcmcsae
Check: tests
New result: ERROR
    Running ‘testthat.R’ [89s/91s]
  Running the tests in ‘tests/testthat.R’ failed.
  Complete output:
    > library(testthat)
    > 
    > test_check("mcmcsae")
    Loading required package: mcmcsae
    
    Attaching package: 'mcmcsae'
    
    The following object is masked from 'package:stats':
    
        spline
    
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 728 ]
    
    ══ Failed tests ════════════════════════════════════════════════════════════════
    ── Error ('test_bart.R:23:3'): BART component 'brt' works ──────────────────────
    Error in `p[[name_sampler]]$run(0L, 1L, FALSE)`: number of threads must be greater than or equal to 1
    Backtrace:
        ▆
     1. └─mcmcsae::MCMCsim(...) at test_bart.R:23:3
     2.   └─sampler$start(p[[ch]])
     3.     └─mod[[2L]]$start(p)
     4.       └─p[[name_sampler]]$run(0L, 1L, FALSE)
    
    [ FAIL 1 | WARN 0 | SKIP 0 | PASS 728 ]
    Error: Test failures
    Execution halted