Function to create forest plots for objects of class "cumul.rma"
.
# S3 method for cumul.rma
forest(x, annotate=TRUE, header=FALSE,
xlim, alim, clim, ylim, top=3, at, steps=5,
level=x$level, refline=0, digits=2L, width,
xlab, ilab, ilab.xpos, ilab.pos,
transf, atransf, targs, rows,
efac=1, pch=15, psize=1, col, lty, fonts,
cex, cex.lab, cex.axis, annosym, …)
an object of class "cumul.rma"
.
logical specifying whether annotations should be added to the plot (the default is TRUE
).
logical specifying whether column headings should be added to the plot (the default is FALSE
). Can also be a character vector to specify the left and right headings.
horizontal limits of the plot region. If unspecified, the function tries to set the horizontal plot limits to some sensible values.
the actual x-axis limits. If unspecified, the function tries to set the x-axis limits to some sensible values.
limits for the confidence intervals. If unspecified, no limits are used.
the y limits of the plot. If unspecified, the function tries to set the y-axis limits to some sensible values.
the amount of space to leave empty at the top of the plot (e.g., for adding headers) (the default is 3 rows).
position of the x-axis tick marks and corresponding labels. If unspecified, the function tries to set the tick mark positions/labels to some sensible values.
the number of tick marks for the x-axis (the default is 5). Ignored when the user specifies the positions via the at
argument.
numerical value between 0 and 100 specifying the confidence interval level (the default is to take the value from the object).
value at which a vertical ‘reference’ line should be drawn (the default is 0). The line can be suppressed by setting this argument to NA
.
integer specifying the number of decimal places to which the tick mark labels of the x-axis and the annotations should be rounded (the default is 2L
). Can also be a vector of two integers, the first specifying the number of decimal places for the annotations, the second for the x-axis labels. When specifying an integer (e.g., 2L
), trailing zeros after the decimal mark are dropped for the x-axis labels. When specifying a numerical value (e.g., 2
), trailing zeros are retained.
optional integer to manually adjust the width of the columns for the annotations.
title for the x-axis. If unspecified, the function tries to set an appropriate axis title.
optional vector, matrix, or data frame providing additional information about the studies that should be added to the plot.
vector of numerical value(s) specifying the x-axis position(s) of the variable(s) given via ilab
(must be specified if ilab
is specified).
integer(s) (either 1, 2, 3, or 4) specifying the alignment of the vector(s) given via ilab
(2 means right, 4 mean left aligned). If unspecified, the default is to center the labels.
optional argument specifying the name of a function that should be used to transform the observed effect sizes, summary estimates, fitted values, and confidence interval bounds (e.g., transf=exp
; see also transf). If unspecified, no transformation is used.
optional argument specifying the name of a function that should be used to transform the x-axis labels and annotations (e.g., atransf=exp
; see also transf). If unspecified, no transformation is used.
optional arguments needed by the function specified via transf
or atransf
.
optional vector specifying the rows (or more generally, the horizontal positions) for plotting the outcomes. If unspecified, the function sets this value automatically. Can also be a single value specifying the row (horizontal position) of the first outcome (the remaining outcomes are then plotted below this starting row).
vertical expansion factor for confidence interval limits and arrows. The default value of 1 should usually work okay. Can also be a vector of two numbers, the first for CI limits, the second for arrows.
plotting symbol to use for the observed effect sizes or outcomes. By default, a filled square is used. See points
for other options. Can also be a vector of values.
optional vector with point sizes for the observed effect sizes or outcomes. Default is 1.
optional character string specifying the name of a color to use for plotting ("black" is used by default if not specified). Can also be a vector of color names.
optional character string specifying the line type for the confidence intervals (if unspecified, the function sets this to "solid"
by default).
optional character string specifying the font to use for the study labels, annotations, and the extra information (if specified via ilab
). If unspecified, the default font is used.
optional character and symbol expansion factor. If unspecified, the function tries to set this to a sensible value.
optional expansion factor for the x-axis title. If unspecified, the function tries to set this to a sensible value.
optional expansion factor for the x-axis labels. If unspecified, the function tries to set this to a sensible value.
optional vector of length 3 to change the left bracket, separation, and right bracket symbols for the annotations.
other arguments.
The plot shows the estimated (average) outcome with corresponding confidence interval as one study at a time is added to the analysis.
Chalmers, T. C., & Lau, J. (1993). Meta-analytic stimulus for changes in clinical trials. Statistical Methods in Medical Research, 2, 161--172.
Lau, J., Schmid, C. H., & Chalmers, T. C. (1995). Cumulative meta-analysis of clinical trials builds evidence for exemplary medical care. Journal of Clinical Epidemiology, 48, 45--57.
Lewis, S., & Clarke, M. (2001). Forest plots: Trying to see the wood and the trees. British Medical Journal, 322, 1479--1480.
Viechtbauer, W. (2010). Conducting meta-analyses in R with the metafor package. Journal of Statistical Software, 36(3), 1--48. https://www.jstatsoft.org/v036/i03.
# NOT RUN {
### calculate log risk ratios and corresponding sampling variances
dat <- escalc(measure="RR", ai=tpos, bi=tneg, ci=cpos, di=cneg, data=dat.bcg)
### random-effects model
res <- rma(yi, vi, data=dat, slab=paste(author, year, sep=", "))
x <- cumul(res, order=order(dat$year))
forest(x, cex=.8)
forest(x, alim=c(-2,1), cex=.8)
### meta-analysis of the (log) risk ratios using the Mantel-Haenszel method
res <- rma.mh(measure="RR", ai=tpos, bi=tneg, ci=cpos, di=cneg, data=dat.bcg,
slab=paste(author, year, sep=", "))
x <- cumul(res, order=order(dat$year))
forest(x, alim=c(-2,1), cex=.8)
# }
Run the code above in your browser using DataLab