[R-meta] Constraint rrror when using Wald_test_cwb
Pearl, Brendan
Brend@n@Pe@r| @end|ng |rom mh@org@@u
Sat Sep 14 11:28:03 CEST 2024
Hello,
I am trying to run a cluster wild bootstrap, but am getting the following error:
Error in constrain_zero(constraints = constraints, coefs = coefs) :
Constraint indices must be less than or equal to 1.
Question: What does this mean?
Thankyou,
Brendan
Background (if relevant):
I am running a purely exploratory series of meta-analyses of the relationships between several predictors and outcomes (i.e. n x m meta-analyses).
There is non-independence within each predictor-relationship pair (some studies report multiple effect sizes for the same group of participants) and the effect sizes are nested.
I am following the general workflow outlined here: (https://wviechtb.github.io/metafor/reference/misc-recs.html#general-workflow-for-meta-analyses-involving-complex-dependency-structures) and want to use cluster wild bootstrapping because some analyses have very few studies (and cluster-robust inference methods led to very wide confidence intervals)
Minimal working example:
```{r}
dat_temp_mwe <- structure(list(study = c("A", "B", "C", "D", "E", "E", "F", "F",
"F", "F", "G"), effect_id = c(11, 28, 73, 93, 115, 232, 236,
242, 252, 266, 284), Paper = c("AA", "BB", "CC", "DD", "EE1",
"EE2", "FF1", "FF2", "FF3", "FF4", "GG"), Mean_age_when_outcome_measured = c(21,
19, 26, 19, 19, 21, 21, 21, 21, 19, 19), yi = structure(c(-0.0401817896328312,
-0.0700000000000002, -0.151002873536528, -0.113328685307003,
-0.139761942375159, -0.0392207131532808, -0.0487901641694324,
-0.05, -0.041141943331175, -0.0421011760186351, -0.604315966853329
), ni = c(1566, 844, 624, 355, 7449, 2135, 2410, 4853, 6912,
7842, 1202), measure = "GEN"), vi = c(0.00014647659162424, 0.000527143487544687,
0.00336452354486442, 0.00116040765035603, 0.00667694039383453,
9.6295107522168e-05, 9.44692075770055e-05, 0.000100003675148229,
2.50009187870589e-05, 2.50009187870581e-05, 0.0292124283937479
)), row.names = c(NA, 11L), class = c("escalc", "data.frame"), yi.names = "yi", vi.names = "vi", digits = c(est = 4,
se = 4, test = 4, pval = 4, ci = 4, var = 4, sevar = 4, fit = 4,
het = 4))
V <- vcalc(vi,
cluster = study,
obs = effect_id,
time1 = Mean_age_when_outcome_measured,
data = dat_temp_mwe,
rho = 0.8,
phi = 0.9)
meta_analysis_output <- rma.mv(
yi,
V = V,
random = ~ 1 | study / Paper / effect_id,
data = dat_temp_mwe,
control = list(rel.tol = 1e-8))
Wald_test_cwb(full_model = meta_analysis_robust,
constraints = constrain_equal(1:3),
R = 99,
seed = 20201229)
```
More information about the R-sig-meta-analysis
mailing list