Calling example("example_smk_ume")
will run an unrelated mean
effects (inconsistency) NMA model with the smoking cessation data, using the
code in the Examples section below. The resulting stan_nma
object
smk_fit_RE_UME
will then be available in the global environment.
Smoking UME NMA for use in examples.
# NOT RUN {
# Set up network of smoking cessation data
head(smoking)
smk_net <- set_agd_arm(smoking,
study = studyn,
trt = trtc,
r = r,
n = n,
trt_ref = "No intervention")
# Print details
smk_net
# }
# NOT RUN {
# Fitting an unrelated mean effects (inconsistency) model
smk_fit_RE_UME <- nma(smk_net, refresh = if (interactive()) 200 else 0,
consistency = "ume",
trt_effects = "random",
prior_intercept = normal(scale = 100),
prior_trt = normal(scale = 100),
prior_het = normal(scale = 5))
smk_fit_RE_UME
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab