netgraph.netimpact: Network graph for objects of class netimpact

In guido-s/netmeta: Network Meta-Analysis using Frequentist Methods

Network graph for objects of class netimpact

Description

This function generates a graph of the evidence network.

Usage

## S3 method for class 'netimpact'
netgraph(
  x,
  col.ignore = "red",
  number.of.studies = TRUE,
  main,
  sub,
  multiarm = FALSE,
  col.multiarm = NULL,
  alpha.transparency = 0.5,
  col.ignore.multiarm = "transparent",
  col = "black",
  plastic = FALSE,
  ...
)

Arguments

x	An object of class netimpact.
col.ignore	A character string indicating color for comparisons removed from network, either "transparent" or any color defined in colours.
number.of.studies	A logical indicating whether number of studies should be added to network graph.
main	Main title.
sub	Subtitle.
multiarm	A logical indicating whether multi-arm studies should be marked in plot.
col.multiarm	Either a function from R package colorspace or grDevice to define colors for multi-arm studies or a character vector with colors to highlight multi-arm studies.
alpha.transparency	The alpha transparency of colors used to highlight multi-arm studies (0 means transparent and 1 means opaque).
col.ignore.multiarm	A character string indicating color to mark multi-arm studies removed from network, either "transparent" or any color defined in colours.
col	A single color (or vector of colors) for lines connecting treatments (edges) if argument plastic = FALSE. Length of the vector must be equal to the number of edges.
plastic	A logical indicating whether the appearance of the comparisons should be in '3D look'.
...	Additional arguments passed on to netgraph.netmeta.

Author(s)

Guido Schwarzer [e-mail], Gerta Rücker [e-mail]

See Also

netimpact, netgraph.netmeta

Examples

data(Franchini2012)

# Only consider first two studies (to reduce runtime of example)
#
studies <- unique(Franchini2012$Study)
p1 <- pairwise(list(Treatment1, Treatment2, Treatment3),
  n = list(n1, n2, n3),
  mean = list(y1, y2, y3), sd = list(sd1, sd2, sd3),
  data = subset(Franchini2012, Study %in% studies[1:2]),
  studlab = Study)

net1 <- netmeta(p1)
ni1 <- netimpact(net1, verbose = TRUE)
netgraph(ni1)
netgraph(ni1, plastic = TRUE)

## Not run: 
p2 <- pairwise(list(Treatment1, Treatment2, Treatment3),
  n = list(n1, n2, n3),
  mean = list(y1, y2, y3), sd = list(sd1, sd2, sd3),
  data = Franchini2012,
  studlab = Study)

net2 <- netmeta(p2)
ni2 <- netimpact(net2, verbose = TRUE)
netgraph(ni2)
netgraph(ni2, plastic = TRUE)

## End(Not run)

guido-s/netmeta documentation built on April 8, 2024, 5:31 a.m.