netmeta (version 1.2-1)

smokingcessation: Network meta-analysis of interventions for smoking cessation

Description

Network meta-analysis comparing the effects of a number of interventions for smoking cessation.

These data are used as an example in Dias et al. (2013), page 651.

Format

A data frame with the following columns:

event1	number of individuals with successful smoking cessation in arm 1
n1	number of individuals in arm 1
event2	number of individuals with successful smoking cessation in arm 2
n2	number of individuals in arm 2
event3	number of individuals with successful smoking cessation in arm 3
n3	number of individuals in arm 3
treat1	treatment 1
treat2	treatment 2

See Also

pairwise, metabin, netmeta, netgraph.netmeta

Examples

# NOT RUN {
data(smokingcessation)

# Transform data from arm-based format to contrast-based format
# Argument 'sm' has to be used for odds ratio as summary measure;
# by default the risk ratio is used in the metabin function called
# internally.
#
p1 <- pairwise(list(treat1, treat2, treat3),
               event = list(event1, event2, event3),
               n = list(n1, n2, n3),
               data = smokingcessation,
               sm = "OR")
p1

# Conduct network meta-analysis
#
net1 <- netmeta(p1)
net1

# Draw network graph
#
netgraph(net1, points = TRUE, cex.points = 3, cex = 1.25)
tname <- c("No intervention", "Self-help",
           "Individual counselling", "Group counselling")
netgraph(net1, points = TRUE, cex.points = 3, cex = 1.25, labels = tname)
# }

Run the code above in your browser using DataCamp Workspace