View source: R/inconsistency.functions.R
| get.relative | R Documentation |
Calculates league table of effects between treatments in MBNMA and/or NMA models
get.relative(
lower.diag,
upper.diag = lower.diag,
treatments = list(),
lower.direction = "colvrow",
upper.direction = "rowvcol",
regress.vals = NULL,
eform = FALSE,
lim = "cred"
)
lower.diag |
An S3 object either of class |
upper.diag |
Same as for |
treatments |
A list whose elements each represent different treatments.
Treatment is defined as a combination of agent and dose. Only agents specified in
|
lower.direction |
Whether treatment effects should be presented as the column versus the row treatment
for each cell in the lower-left diagonal of the league table ( |
upper.direction |
Same as for |
regress.vals |
A named numeric vector of effect modifier values at which relative effects
should be estimated. Named elements must match variable names specified in regression design matrix
( |
eform |
Whether outputted results should be presented in their exponential form (e.g. for models with log or logit link functions) |
lim |
Specifies calculation of either 95% credible intervals ( |
An array of length(treatments) x length(treatments) x nsims, where nsims
is the number of iterations monitored in lower.diag. The array contains the individual
MCMC values for each relative effect calculated between all treatments on the link scale
specified in the lower.diag and upper.diag models.
# Using the osteoarthritis data
network <- mbnma.network(osteopain)
# Run an MBNMA model
expon <- mbnma.run(network, fun=dexp(), method="random")
# Calculate relative effects for MBNMA between:
# Celebrex 100mg/d, Celebrex 200mg/d, Tramadol 100mg/d
rel.eff <- get.relative(lower.diag=expon,
treatments=list("Celebrex"=c(100,200), "Tramadol"=100))
# Run an NMA model
nma <- nma.run(network, method="random")
# Compare results between MBNMA and NMA models
rel.eff <- get.relative(lower.diag=expon, upper.diag=nma,
treatments=list("Celebrex"=c(100,200), "Tramadol"=100),
upper.direction="colvrow")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.