Running 'testthat.R' [80s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(StratifiedMedicine)
  > 
  > test_check("StratifiedMedicine")
  *****Into main of wbart
  *****Data:
  data:n,p,np: 800, 33, 3200
  y1,yn: -0.622732, -0.414396
  x1,x[n*p]: 0.793981, 0.000000
  xp1,xp[np*p]: 0.000000, 0.332910
  *****Number of Trees: 200
  *****Number of Cut Points: 100 ... 100
  *****burn and ndpost: 100, 1000
  *****Prior:beta,alpha,tau,nu,lambda: 2.000000,0.950000,0.124534,3.000000,0.191874
  *****sigma: 0.992482
  *****w (weights): 1.000000 ... 1.000000
  *****Dirichlet:sparse,theta,omega,a,b,rho,augment: 0,0,1,0.5,1,33,0
  *****nkeeptrain,nkeeptest,nkeeptestme,nkeeptreedraws: 1000,1000,1000,1000
  *****printevery: 100
  *****skiptr,skipte,skipteme,skiptreedraws: 1,1,1,1
  
  MCMC
  done 0 (out of 1100)
  done 100 (out of 1100)
  done 200 (out of 1100)
  done 300 (out of 1100)
  done 400 (out of 1100)
  done 500 (out of 1100)
  done 600 (out of 1100)
  done 700 (out of 1100)
  done 800 (out of 1100)
  done 900 (out of 1100)
  done 1000 (out of 1100)
  time: 26s
  check counts
  trcnt,tecnt,temecnt,treedrawscnt: 1000,1000,1000,1000
  *****Into main of wbart
  *****Data:
  data:n,p,np: 800, 33, 3200
  y1,yn: -0.622732, -0.414396
  x1,x[n*p]: 0.793981, 0.000000
  xp1,xp[np*p]: 0.000000, 0.332910
  *****Number of Trees: 200
  *****Number of Cut Points: 100 ... 100
  *****burn and ndpost: 100, 1000
  *****Prior:beta,alpha,tau,nu,lambda: 2.000000,0.950000,0.124534,3.000000,0.191874
  *****sigma: 0.992482
  *****w (weights): 1.000000 ... 1.000000
  *****Dirichlet:sparse,theta,omega,a,b,rho,augment: 0,0,1,0.5,1,33,0
  *****nkeeptrain,nkeeptest,nkeeptestme,nkeeptreedraws: 1000,1000,1000,1000
  *****printevery: 100
  *****skiptr,skipte,skipteme,skiptreedraws: 1,1,1,1
  
  MCMC
  done 0 (out of 1100)
  done 100 (out of 1100)
  done 200 (out of 1100)
  done 300 (out of 1100)
  done 400 (out of 1100)
  done 500 (out of 1100)
  done 600 (out of 1100)
  done 700 (out of 1100)
  done 800 (out of 1100)
  done 900 (out of 1100)
  done 1000 (out of 1100)
  time: 25s
  check counts
  trcnt,tecnt,temecnt,treedrawscnt: 1000,1000,1000,1000
  -- 1. Error: Test whether individual ple models run alone and within PRISM; chec
  'arg' must be NULL or a character vector
  Backtrace:
    1. StratifiedMedicine:::ple_checker(Y = Y, A = A, X = Xstar, ple = ple)
    2. StratifiedMedicine::PRISM(...)
    3. StratifiedMedicine::PRISM_train(...)
    4. StratifiedMedicine::ple_train(...)
    6. StratifiedMedicine::ple_causal_forest(...)
    7. grf::causal_forest(...)
    8. grf::tune_causal_forest(...)
   10. base::match.arg(tune.parameters, all.tunable.params, several.ok = TRUE)
  
  == testthat results  ===========================================================
  [ OK: 9 | SKIPPED: 2 | WARNINGS: 0 | FAILED: 1 ]
  1. Error: Test whether individual ple models run alone and within PRISM; check plots (@test-ple_preds_plots.R#29) 
  
  Error: testthat unit tests failed
  Execution halted