netgraph: Network graph

Description

This function generates a graph of the evidence network.

Usage

netgraph(x, seq=NULL, labels=NULL, plastic=TRUE, thickness=TRUE, 
         col="slateblue", lwd=1,
         highlight=NULL, col.highlight="red2", lwd.highlight=2, ...)

Arguments

An object of class netmeta.

seq

A character or numerical vector specifying the sequence of treatments arrangement anticlockwise.

labels

An optional vector with treatment labels.

plastic

A logical indicating whether the appearance of the comparisons should be in 3D look.

thickness

A logical indicating if the thickness of the comparisons should be proportional to the inverse standard errors or not if plastic=FALSE.

col

Color for comparisons if plastic=FALSE.

lwd

A numeric for scaling the line width of comparisons.

highlight

A character identifying a comparison that should be marked in the network graph, e.g. highlight="treat1:treat2".

col.highlight

Color for highlighting the comparison given by highlight.

lwd.highlight

A numeric for the line width for highlighting the comparison given by highlight.

...

Additional graphical arguments (ignored at the moment).

Details

The nodes in the graph are associated with the treatments and are placed on the circumcircle. The comparisons display the observed treatment comparisons. The thickness of the comparisons can be chosen to be proportional to the inverse standard error of the treatment effects, aggregated over all studies including the two respective treatments.

References

Krahn U, Binder H, König J (2013), A graphical tool for locating inconsistency in network meta-analyses. BMC Medical Research Methodology, 13, 35.

Examples

Run this code

data(Senn2013)

##
## Generation of an object of class 'netmeta' with reference treatment 'plac'
##
net1 <- netmeta(TE, seTE, treat1, treat2, studlab,
        data=Senn2013, sm="MD", reference="plac")

##
## Network graph with specified order of the treatments and one
## highlighted comparison
##
netgraph(net1, highlight="acar:metf",
         seq=c("plac", "benf", "migl", "acar", "sulf",
               "metf", "rosi", "piog", "sita", "vild"))

##
## Network graph without 3D look of the comparisons and one highlighted comparison
##
netgraph(net1, plastic=FALSE, highlight="acar:metf")

##
## Network graph without 3D look and comparisons with same thickness
##
netgraph(net1, plastic=FALSE, thickness=FALSE)

##
## Network graph with changed labels and specified order of the
## treatments
##
netgraph(net1, seq=c(1, 3, 5, 2, 9, 4, 7, 6, 8, 10),
         labels=LETTERS[1:10])