network.deviance.plot {bnma}

Make a deviance plot

Description

This makes a deviance plot which plots residual deviance (dev_arm) vs. all the arms for each study.

Usage

network.deviance.plot(result)

Arguments

result

Object created by network.run function

Value

None

Examples

network <- with(blocker, {
 network.data(Outcomes, Study, Treat, N = N, response = "binomial")
})

result <- network.run(network)
network.deviance.plot(result)