netgraph.netimpact: Network graph for objects of class netimpact

View source: R/netgraph.netimpact.R

netgraph.netimpactR Documentation

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 guido.schwarzer@uniklinik-freiburg.de, Gerta Rücker gerta.ruecker@uniklinik-freiburg.de

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)



netmeta documentation built on June 23, 2024, 9:06 a.m.