metacor(cor, n, studlab,
data=NULL, subset=NULL,
sm=gs("smcor"),
level=gs("level"), level.comb=gs("level.comb"),
comb.fixed=gs("comb.fixed"), comb.random=gs("comb.random"),
hakn=gs("hakn"),
method.tau=gs("method.tau"), tau.preset=NULL, TE.tau=NULL,
tau.common=gs("tau.common"),
prediction=gs("prediction"), level.predict=gs("level.predict"),
null.effect=0,
method.bias=gs("method.bias"),
backtransf=gs("backtransf"),
title=gs("title"), complab=gs("complab"), outclab="",
byvar, bylab, print.byvar=gs("print.byvar"),
byseparator = gs("byseparator"),
keepdata=gs("keepdata")
)"ZCOR" or "COR") is to be used for pooling of
studies."DL", "PM", "REML", "ML", "HS",
"SJ", "HE", or "EB", can be abbreviated."rank", "linreg", or "mm", can
be abbreviated. See function metabiassm="ZCOR") should be back
transformed in printouts and plots. If TRUE (default), results
will be presented as correlations; otherwise Fisher's z
transformed correlations will be shown.event.e).c("metacor", "meta") with corresponding
print, summary, plot function. The object is a
list containing the following components:
sm="ZCOR") or correlations (sm="COR") for individual
studies."Inverse"hakn=TRUE).byvar is not
missing.byvar
is not missing.byvar is not missing.byvar is not missing.byvar is not missing.byvar is not missing.byvar is not missing.byvar is not missing.byvar is not missing
and hakn=TRUE.byvar is not missing.byvar is
not missing.byvar is not missing.byvar
is not missing.byvar is not missing.byvar is not missing.byvar is not missing
(only calculated if argument tau.common is TRUE).byvar is not missing.byvar is not missing.byvar is not
missing.byvar is not missing.byvar is not missing.byvar is not missing.byvar is not missing.byvar is
not missing.byvar is not missing.byvar is
not missing.keepdata=TRUE).keepdata=TRUE).sm="ZCOR") or direct combination of correlations
(sm="COR") (see Cooper et al., p264-5 and p273-4). Only few statisticians would advocate the use of untransformed
correlations unless sample sizes are very large (see Cooper et al.,
p265). The artificial example given below shows that the smallest
study gets the largest weight if correlations are combined directly
because the correlation is closest to 1. For several arguments defaults settings are utilised (assignments
using gs function). These defaults can be changed
using the settings.meta function. Internally, both fixed effect and random effects models are
calculated regardless of values choosen for arguments
comb.fixed and comb.random. Accordingly, the estimate
for the random effects model can be extracted from component
TE.random of an object of class "meta" even if
argument comb.random=FALSE. However, all functions in R
package meta will adequately consider the values for
comb.fixed and comb.random. E.g. function
print.meta will not print results for the random
effects model if comb.random=FALSE. A prediction interval for treatment effect of a new study is
calculated (Higgins et al., 2009) if arguments prediction and
comb.random are TRUE. R function update.meta can be used to redo the
meta-analysis of an existing metacor object by only specifying
arguments which should be changed. For the random effects, the method by Hartung and Knapp (2003) is
used to adjust test statistics and confidence intervals if argument
hakn=TRUE. The DerSimonian-Laird estimate (1986) is used in the random effects
model if method.tau="DL". The iterative Paule-Mandel method
(1982) to estimate the between-study variance is used if argument
method.tau="PM". Internally, R function paulemandel is
called which is based on R function mpaule.default from R package
metRology from S.L.R. Ellison <s.ellison at lgc.co.uk>. If R package metafor (Viechtbauer 2010) is installed, the
following methods to estimate the between-study variance
\(\tau^2\) (argument method.tau) are also available:
method.tau="REML")
method.tau="ML")
method.tau="HS")
method.tau="SJ")
method.tau="HE")
method.tau="EB").
rma.uni of R package
metafor is called internally. See help page of R function
rma.uni for more details on these methods to estimate
between-study variance.update.meta, metacont, metagen, print.metam1 <- metacor(c(0.85, 0.7, 0.95), c(20, 40, 10))
#
# Print correlations (back transformed from Fisher's z transformation)
#
m1
#
# Print Fisher's z transformed correlations
#
print(m1, backtransf=FALSE)
#
# Forest plot with back transformed correlations
#
forest(m1)
#
# Forest plot with Fisher's z transformed correlations
#
forest(m1, backtransf=FALSE)
m2 <- update(m1, sm="cor")
m2
# Identical forest plots (as back transformation is the identity transformation)
# forest(m2)
# forest(m2, backtransf=FALSE)
Run the code above in your browser using DataLab