[R-meta] mismatch in outputs from meta-analysis and corresponding forest plot
Joao Afonso
jot@|on@o @end|ng |rom gm@||@com
Tue Feb 4 12:07:02 CET 2020
Dear all,
I am conducting a meta-analysis and came across an odd issue. I ran the
model for assessing the moderator effect of a variable as per below.
*subganal.lcmbi=rma(yi, vi, data=ies.logit.lcmbi, mods=~lcmbi,
method="DL")pes.logit.lcm=rma(yi, vi, data=ies.logit.lcmbi,
mods=~lcmbi=="Records", method="DL")pes.logit.records=rma(yi, vi,
data=ies.logit.lcmbi, mods=~lcmbi=="Locomotion Scoring Method",
method="DL")pes.subg.lcmbi=predict(subganal.lcmbi,transf=transf.ilogit)dat.samevar=data.frame(estimate=c((pes.logit.lcm$b)[1],
(pes.logit.records$b)[1]),stderror=c((pes.logit.lcm$se)[1],
(pes.logit.records$se)[1]),tau2=subganal.lcmbi$tau2)pes.logit.lcm=rma(estimate,
sei=stderror,method="DL",data=dat.samevar)pes.lcmbi=predict(pes.logit.lcm,
transf=transf.ilogit)print(pes.logit.lcm, digits=3) #display subgroup 1
summary effect sizeprint(pes.logit.records, digits=3) #display subgroup 2
summary effect sizeprint(subganal.lcmbi, digits=3) #display subgroup
analysis resultsprint(pes.lcmbi, digits=3) #display recomputed summary
effect size*
and got the following output
* pred ci.lb <http://ci.lb/> ci.ub cr.lb <http://cr.lb/> cr.ub 0.237 0.149
0.355 0.112 0.434*
However when plotting the corresponding forest plot I get the pooled at
0.25 (0.21 - 0.31).
*subganal.lcmbi=rma(yi, vi, data=ies.logit.lcmbi, mods=~lcmbi,
method="DL")pes.summary=metaprop(nlameanimal, ssizeanimal, author,
data=ies.logit.lcmbi, sm="PLO",
method.tau="DL", method.ci <http://method.ci>="NAsm",
byvar=lcmbi, tau.common=TRUE,
tau.preset=sqrt(subganal.lcmbi$tau2))precision=sqrt(ies.logit.lcmbi$vi)jpeg(file="forest_cow_all_lcmbi.jpeg",
width=11, height=12, units="in", res=300)forest(pes.summary,
xlim=c(0,1), pscale=1, rightcols=FALSE,
leftcols=c("studlab", "effect", "ci"), leftlabs=c("Study",
"Prevalence", "95% C.I."), text.random="Prevalence of Lameness in
British Dairy Cattle", bylab = "Lameness Data Source",
print.byvar = TRUE, xlab="Prevalence of Lameness", smlab="",
weight.study="random", squaresize=0.5, col.square="navy",
col.diamond="maroon", col.diamond.lines="maroon",
pooled.totals=FALSE, comb.fixed=FALSE, fs.hetstat=10,
print.tau2=TRUE, print.Q=TRUE, print.pval.Q=TRUE,
print.I2=TRUE, digits=2, sortvar = precision)dev.off()*
Any idea of what could be producing this or what could I be doing wrong?
Many thanks,
Joao
--
João Afonso
DVM, MSc Veterinary Epidemiology
PhD Student
Department of Infection and Global Health
University of Liverpool
+351914812305
[[alternative HTML version deleted]]
More information about the R-sig-meta-analysis
mailing list