View source: R/print.netbind.R
print.netbind | R Documentation |
Print method for objects of class netbind
.
## S3 method for class 'netbind'
print(
x,
common = x$x$common,
random = x$x$random,
warn.deprecated = gs("warn.deprecated"),
...
)
x |
An object of class |
common |
A logical indicating whether results for the common effects model should be printed. |
random |
A logical indicating whether results for the random effects model should be printed. |
warn.deprecated |
A logical indicating whether warnings should be printed if deprecated arguments are used. |
... |
Additional arguments (to catch deprecated arguments). |
Guido Schwarzer guido.schwarzer@uniklinik-freiburg.de
netbind
data(Linde2016)
# Only consider studies including Face-to-face PST (to reduce
# runtime of example)
#
face <- subset(Linde2016, id %in% c(16, 24, 49, 118))
# Standard random effects NMA model (with placebo as reference
# treatment)
#
net1 <- netmeta(lnOR, selnOR, treat1, treat2, id,
data = face, reference.group = "placebo",
sm = "OR", common = FALSE)
# Additive CNMA model with placebo as inactive component and
# reference
#
nc1 <- netcomb(net1, inactive = "placebo")
# Combine results of standard NMA and CNMA
#
nb1 <- netbind(nc1, net1,
name = c("Additive CNMA", "Standard NMA"),
col.study = c("red", "black"), col.square = c("red", "black"))
nb1
print(nb1, common = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.