R Under development (unstable) (2023-11-26 r85638 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2023 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(testthat)
> library(BAS)
> 
> test_check("BAS")

 Marginal Posterior Summaries of Coefficients: 

 Using  BMA 

 Based on the top  16 models 
           post mean  post SD   post p(B != 0)
Intercept  95.42308    0.67885   1.00000      
X1          1.40116    0.35351   0.97454      
X2          0.42326    0.38407   0.76017      
X3         -0.03997    0.33398   0.30660      
X4         -0.22077    0.36931   0.44354      

Call:
bas.lm(formula = Y ~ ., data = Hald, prior = "BIC", modelprior = uniform())


 Marginal Posterior Inclusion Probabilities: 
Intercept         X1         X2         X3         X4  
   1.0000     0.9856     0.7921     0.4705     0.5220  
[ FAIL 0 | WARN 0 | SKIP 1 | PASS 231 ]

══ Skipped tests (1) ═══════════════════════════════════════════════════════════
• On CRAN (1): 'test-bas-lm-lowrank.R:49:3'

[ FAIL 0 | WARN 0 | SKIP 1 | PASS 231 ]
> 
> proc.time()
   user  system elapsed 
  17.43    0.95   18.39