Expose progress.bar in R2jags::jags() in BayesianWAgg() to user

[egouldo]

Despite message: false in chunk, jags output is still printed

library(aggreCAT)
knitr::opts_current$get("message")
#> [1] FALSE
BayesianWAgg(data_ratings,
                 "BayTriVar",
                 percent_toggle = TRUE)
#> Compiling model graph
#>    Resolving undeclared variables
#>    Allocating nodes
#> Graph information:
#>    Observed stochastic nodes: 625
#>    Unobserved stochastic nodes: 25
#>    Total graph size: 5904
#> 
#> Initializing model
#> # A tibble: 25 × 4
#>    method    paper_id    cs n_experts
#>    <chr>     <chr>    <dbl>     <int>
#>  1 BayTriVar 100      0.594        25
#>  2 BayTriVar 102      0.156        25
#>  3 BayTriVar 103      0.661        25
#>  4 BayTriVar 104      0.332        25
#>  5 BayTriVar 106      0.116        25
#>  6 BayTriVar 108      0.748        25
#>  7 BayTriVar 109      0.757        25
#>  8 BayTriVar 116      0.629        25
#>  9 BayTriVar 118      0.508        25
#> 10 BayTriVar 133      0.702        25
#> # ℹ 15 more rows

^{Created on 2026-04-10 with reprex v2.1.1}

[egouldo]

Relevant line:

aggreCAT/R/BayesianWAgg.R

Line 387 in ab5f543

### For each participant, up to the number of participants on that claim.