netmeta (version 0.9-0)

dietaryfat: Network meta-analysis of dietary fat

Description

Network meta-analysis comparing the effects of two diets to control on mortality.

The data are rates, given as the number of deaths and person-years. These data are used as an example in the supplemental material of Dias S, Sutton AJ, Ades AE and Welton NJ (2013).

Usage

data(dietaryfat)

Format

A data frame with the following columns:

treat1

Treatment 1

treat2

Treatment 2

treat3

Treatment 3

years1

Person years arm 1

years2

Person years arm 2

years3

Person years arm 3

d1

events (deaths) arm 1

d2

events (deaths) arm 2

d3

events (deaths) arm 3

ID

Study ID

Source

Dias S, Sutton AJ, Ades AE and Welton NJ (2013). Evidence synthesis for decision making 2: A generalized linear modeling framework for pairwise and network meta-analysis of randomized controlled trials. Medical Decision Making 33, 607--617.

See Also

pairwise, metainc, netmeta, netgraph

Examples

data(dietaryfat)

# Transform data from arm-based format to contrast-based format
p1 <- pairwise(list(treat1, treat2, treat3),
               list(d1, d2, d3),
               time=list(years1, years2, years3),
               studlab=ID,
               data=dietaryfat)
p1

# Conduct network meta-analysis using incidence rate ratios (sm="IRR").
# Note, the argument 'sm' is not necessary as this is the default in R
# function metainc called internally
net1 <- netmeta(TE, seTE, treat1, treat2, studlab, data=p1, sm="IRR")
summary(net1)

# Conduct network meta-analysis using incidence rate differences
# (sm="IRD").
net2 <- netmeta(TE, seTE, treat1, treat2, studlab, data=p1, sm="IRD")
summary(net2)

# Draw network graph
netgraph(net1, points=TRUE, cex.points=3, cex=1.25)
tname <- c("Control","Diet", "Diet 2")
netgraph(net1, points=TRUE, cex.points=3, cex=1.25, labels=tname)