mbnma.run()
This vignette demonstrates how to use MBNMAdose
to perform Model-Based Network Meta-Analysis (MBNMA) of studies with multiple doses of different agents by accounting for the dose-response relationship. This can connect disconnected networks via the dose-response relationship and the placebo response, improve precision of estimated effects and allow interpolation/extrapolation of predicted response based on the dose-response relationship.
Modelling the dose-response relationship also avoids the “lumping” of different doses of an agent which is often done in Network Meta-Analysis (NMA) and can introduce additional heterogeneity or inconsistency. All models and analyses are implemented in a Bayesian framework, following an extension of the standard NMA methodology presented by (Lu and Ades 2004) and are run in JAGS (version 4.3.0 or later is required) (2017). For full details of dose-response MBNMA methodology see Mawdsley et al. (2016). Throughout this vignette we refer to a treatment as a specific dose or a specific agent
This package has been developed alongside MBNMAtime
, a package that allows users to perform time-course MBNMA to incorporate multiple time points within different studies. However, they should not be loaded into R at the same time as there are a number of functions with shared names that perform similar tasks yet are specific to dealing with either time-course or dose-response data.
Functions within MBNMAdose
follow a clear pattern of use:
mbnma.network()
mbnma.run()
, or any of the available wrapper dose-response functionsnma.nodesplit()
and nma.run()
predict()
get.relative()
At each of these stages there are a number of informative plots that can be generated to help understand the data and to make decisions regarding model fitting.
triptans
is from a systematic review of interventions for pain relief in migraine (Thorlund et al. 2014). The outcome is binary, and represents (as aggregate data) the number of participants who were headache-free at 2 hours. Data are from patients who had had at least one migraine attack, who were not lost to follow-up, and who did not violate the trial protocol. The dataset includes 70 Randomised-Controlled Trials (RCTs), comparing 7 triptans with placebo. Doses are standardised as relative to a “common” dose, and in total there are 23 different treatments (combination of dose and agent). triptans
is a data frame in long format (one row per arm and study), with the variables studyID
, AuthorYear
, N
, r
, dose
and agent
.
studyID | AuthorYear | n | r | dose | agent |
---|---|---|---|---|---|
1 | Tfelt-Hansen P 2006 | 22 | 6 | 0 | placebo |
1 | Tfelt-Hansen P 2006 | 30 | 14 | 1 | sumatriptan |
2 | Goadsby PJ 2007 | 467 | 213 | 1 | almotriptan |
2 | Goadsby PJ 2007 | 472 | 229 | 1 | zolmitriptan |
3 | Tuchman M2006 | 160 | 15 | 0 | placebo |
3 | Tuchman M2006 | 174 | 48 | 1 | zolmitriptan |
There are 3 psoriasis datasets from a systematic review of RCTs comparing biologics at different doses and placebo (Warren et al. 2019). Each dataset contains a different binary outcome, all based on the number of patients experiencing degrees of improvement on the Psoriasis Area and Severity Index (PASI) measured at 12 weeks follow-up. Each dataset contains information on the number of participants who achieved \(\geq75\%\) (psoriasis75
), \(\geq90\%\) (psoriasis90
), or \(100\%\) (psoriasis100
).
ssri
is from a systematic review examining the efficacy of different doses of SSRI antidepressant drugs and placebo (Furukawa et al. 2019). The response to treatment is defined as a 50% reduction in depressive symptoms after 8 weeks (4-12 week range) follow-up. The dataset includes 60 RCTs comparing 5 different SSRIs with placebo.
kable(head(ssri), digits = 2)
studyID | bias | age | weeks | agent | dose | n | r |
---|---|---|---|---|---|---|---|
1 | Moderate risk | 43.0 | 6 | placebo | 0 | 149 | 69 |
1 | Moderate risk | 42.9 | 6 | fluoxetine | 20 | 137 | 77 |
2 | Low risk | 41.2 | 6 | placebo | 0 | 137 | 63 |
2 | Low risk | 40.9 | 6 | paroxetine | 20 | 138 | 74 |
7 | Low risk | 41.6 | 6 | placebo | 0 | 158 | 91 |
7 | Low risk | 41.3 | 6 | fluoxetine | 20 | 148 | 89 |
gout
is from a systematic review of interventions for lowering Serum Uric Acid (SUA) concentration in patients with gout [not published previously]. The outcome is continuous, and aggregate data responses correspond to the mean change from baseline in SUA in mg/dL at 2 weeks follow-up. The dataset includes 10 Randomised-Controlled Trials (RCTs), comparing 5 different agents, and placebo. Data for one agent (RDEA) arises from an RCT that is not placebo-controlled, and so is not connected to the network directly. In total there were 19 different treatments (combination of dose and agent). gout
is a data frame in long format (one row per arm and study), with the variables studyID
, y
, se
, agent
and dose
.
studyID | y | se | agent | dose | |
---|---|---|---|---|---|
4 | 1102 | -0.53 | 0.25 | RDEA | 100 |
5 | 1102 | -1.37 | 0.18 | RDEA | 200 |
6 | 1102 | -1.73 | 0.25 | RDEA | 400 |
53 | 2001 | -6.82 | 0.06 | Febu | 240 |
54 | 2001 | 0.15 | 0.04 | Plac | 0 |
92 | 2003 | -3.43 | 0.03 | Allo | 300 |
osteopain
is from a systematic review of interventions for pain relief in osteoarthritis, used previously in Pedder et al. (2019). The outcome is continuous, and aggregate data responses correspond to the mean WOMAC pain score at 2 weeks follow-up. The dataset includes 18 Randomised-Controlled Trials (RCTs), comparing 8 different agents with placebo. In total there were 26 different treatments (combination of dose and agent). The active treatments can also be grouped into 3 different classes, within which they have similar mechanisms of action. osteopain_2wkabs
is a data frame in long format (one row per arm and study), with the variables studyID
, agent
, dose
, class
, y
, se
, and N
.
studyID | agent | dose | class | y | se | n | |
---|---|---|---|---|---|---|---|
13 | 1 | Placebo | 0 | Placebo | 6.26 | 0.23 | 60 |
14 | 1 | Etoricoxib | 10 | Cox2Inhib | 5.08 | 0.16 | 114 |
15 | 1 | Etoricoxib | 30 | Cox2Inhib | 4.42 | 0.17 | 102 |
16 | 1 | Etoricoxib | 5 | Cox2Inhib | 5.34 | 0.16 | 117 |
17 | 1 | Etoricoxib | 60 | Cox2Inhib | 3.62 | 0.17 | 112 |
18 | 1 | Etoricoxib | 90 | Cox2Inhib | 4.08 | 0.17 | 112 |
alog_pcfb
is from a systematic review of Randomised-Controlled Trials (RCTs) comparing different doses of alogliptin with placebo (Langford et al. 2016). The systematic review was simply performed and was intended to provide data to illustrate a statistical methodology rather than for clinical inference. Alogliptin is a treatment aimed at reducing blood glucose concentration in type II diabetes. The outcome is continuous, and aggregate data responses correspond to the mean change in HbA1c from baseline to follow-up in studies of at least 12 weeks follow-up. The dataset includes 14 RCTs, comparing 5 different doses of alogliptin with placebo, leading to 6 different treatments (combination of dose and agent) within the network. alog_pcfb
is a data frame in long format (one row per arm and study), with the variables studyID
, agent
, dose
, y
, se
, and N
.
studyID | agent | dose | y | se | n |
---|---|---|---|---|---|
NCT01263470 | alogliptin | 0.00 | 0.06 | 0.05 | 75 |
NCT01263470 | alogliptin | 6.25 | -0.51 | 0.08 | 79 |
NCT01263470 | alogliptin | 12.50 | -0.70 | 0.06 | 84 |
NCT01263470 | alogliptin | 25.00 | -0.76 | 0.06 | 79 |
NCT01263470 | alogliptin | 50.00 | -0.82 | 0.05 | 79 |
NCT00286455 | alogliptin | 0.00 | -0.13 | 0.08 | 63 |
Before embarking on an analysis, the first step is to have a look at the raw data. Two features (network connectivity and dose-response relationship) are particularly important for MBNMA. For this we want to get our dataset into the right format for the package. We can do this using mbnma.network()
.
# Using the triptans dataset
<- mbnma.network(triptans)
network #> Values for `agent` with dose = 0 have been recoded to `Placebo`
#> agent is being recoded to enforce sequential numbering and allow inclusion of `Placebo`
summary(network)
#> Description: Network
#> Number of studies: 70
#> Number of treatments: 23
#> Number of agents: 8
#> Median (min, max) doses per agent (incl placebo): 4 (3, 6)
#> Agent-level network is CONNECTED
#> Ttreatment-level network is CONNECTED
This function takes a dataset with the columns:
studyID
Study identifiersagent
Agent identifiers (can be character, factor or numeric)dose
Numeric data indicating the dose of the given agent within the study armclass
An optional column indicating a particular class code. Agents with the same name/identifier must also have the same class code.Depending on the type of data (and the likelihood) the following columns are required:
y
Numeric data indicating the mean response for a given study armse
Numeric data indicating the standard error for a given study armr
Numeric data indicating the number of responders in a given study armn
Numeric data indicating the total number of participants in a given study armr
Numeric data indicating the number of events in a given study armE
Numeric data indicating the total exposure time in a given study armIt then performs the following checks on the data:
Finally it converts the data frame into an object of class("mbnma.network")
, which contains indices for study arms, numeric variables for treatments, agents and classes, and stores a vector of treatment, agent and class names as an element within the object. By convention, agents are numbered alphabetically, though if the original data for agents is provided as a factor then the factor codes will be used. This then contains all the necessary information for subsequent MBNMAdose
functions.
Examining how the evidence in the network is connected and identifying which studies compare which treatments/agents helps to understand which effects can be estimated, what information will be helping to inform those estimates, and whether linking via the dose-response relationship is possible if the network is disconnected at the treatment-level. The complexity of dose-response relationships that can be estimated is dependent on the number of doses of each agent available, so this is also important to know.
Network plots can be plotted which shows which treatments/agents have been compared in head-to-head trials. Typically the thickness of connecting lines (“edges”) is proportional to the number of studies that make a particular comparison and the size of treatment nodes (“vertices”) is proportional to the total number of patients in the network who were randomised to a given treatment/agent (provided N
is included as a variable in the original dataset for mbnma.network()
).
In MBNMAdose
these plots are generated using igraph
, and can be plotted by calling plot()
. The generated plots are objects of class("igraph")
meaning that, in addition to the options specified in plot()
, various igraph
functions can subsequently be used to make more detailed edits to them.
Within these network plots, vertices are automatically aligned in a circle (as the default) and can be tidied by shifting the label distance away from the nodes.
# Prepare data using the triptans dataset
<- mbnma.network(triptans)
tripnet #> Values for `agent` with dose = 0 have been recoded to `Placebo`
#> agent is being recoded to enforce sequential numbering and allow inclusion of `Placebo`
summary(tripnet)
#> Description: Network
#> Number of studies: 70
#> Number of treatments: 23
#> Number of agents: 8
#> Median (min, max) doses per agent (incl placebo): 4 (3, 6)
#> Agent-level network is CONNECTED
#> Ttreatment-level network is CONNECTED
# Draw network plot
plot(tripnet)
If some vertices are not connected to the network reference treatment through any pathway of head-to-head evidence, a warning will be given. The nodes that are coloured white represent these disconnected vertices.
# Prepare data using the gout dataset
<- mbnma.network(gout)
goutnet summary(goutnet)
#> Description: Network
#> Number of studies: 10
#> Number of treatments: 19
#> Number of agents: 6
#> Median (min, max) doses per agent (incl placebo): 5 (3, 6)
#> Agent-level network is DISCONNECTED
#> Treatment-level network is DISCONNECTED
plot(goutnet, label.distance = 5)
#> Warning in check.network(g): The following treatments/agents are not connected
#> to the network reference:
#> Allo_245
#> Allo_256
#> Allo_300
#> Allo_400
#> Benz_50
#> Benz_139
#> Benz_143
#> Benz_200
#> Febu_40
#> Febu_80
#> Febu_120
#> RDEA_100
#> RDEA_200
#> RDEA_400
However, whilst at the treatment-level (specific dose of a specific agent), many of these vertices are disconnected, at the agent level they are connected (via different doses of the same agent), meaning that via the dose-response relationship it is possible to estimate results.
# Plot at the agent-level
plot(goutnet, level = "agent", label.distance = 6)
#> Warning in check.network(g): The following treatments/agents are not connected
#> to the network reference:
#> RDEA
One agent (RDEA) is still not connected to the network, but MBNMAdose
allows agents to connect via a placebo response even if they do not include placebo in a head-to-head trial (see [Linking disconnected treatments via the dose-response relationship]).
# Plot connections to placebo via a two-parameter dose-response function (e.g.
# Emax)
plot(goutnet, level = "agent", doselink = 2, remove.loops = TRUE, label.distance = 6)
#> Dose-response connections to placebo plotted based on a dose-response
#> function with 1 degrees of freedom
It is also possible to plot a network at the treatment level but to colour the doses by the agent that they belong to.
# Colour vertices by agent
plot(goutnet, v.color = "agent", label.distance = 5)
#> Warning in check.network(g): The following treatments/agents are not connected
#> to the network reference:
#> Allo_245
#> Allo_256
#> Allo_300
#> Allo_400
#> Benz_50
#> Benz_139
#> Benz_143
#> Benz_200
#> Febu_40
#> Febu_80
#> Febu_120
#> RDEA_100
#> RDEA_200
#> RDEA_400
Several further options exist to allow for inclusion of disconnected treatments, such as assuming some sort of common effect among agents within the same class. This is discussed in more detail later in the vignette.
In order to consider which functional forms may be appropriate for modelling the dose-response relationship, it is useful to look at results from a “split” network meta-analysis (NMA), in which each dose of an agent is considered as separate and unrelated (i.e. we are not assuming any dose-response relationship). The nma.run()
function performs a simple NMA, and by default it drops studies that are disconnected at the treatment-level (since estimates for these will be very uncertain if included).
# Run a random effect split NMA using the alogliptin dataset
<- mbnma.network(alog_pcfb)
alognet <- nma.run(alognet, method = "random") nma.alog
print(nma.alog)
#> $jagsresult
#> Inference for Bugs model at "C:\Users\hp17602\AppData\Local\Temp\Rtmpg7ZQfm\file285c74556853", fit using jags,
#> 3 chains, each with 20000 iterations (first 10000 discarded), n.thin = 10
#> n.sims = 3000 iterations saved
#> mu.vect sd.vect 2.5% 25% 50% 75% 97.5% Rhat
#> d[1] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d[2] -0.455 0.090 -0.629 -0.516 -0.458 -0.398 -0.270 1.001
#> d[3] -0.654 0.046 -0.743 -0.684 -0.654 -0.624 -0.564 1.001
#> d[4] -0.709 0.046 -0.798 -0.739 -0.712 -0.681 -0.614 1.001
#> d[5] -0.759 0.084 -0.923 -0.816 -0.761 -0.704 -0.590 1.001
#> d[6] -0.686 0.167 -1.026 -0.796 -0.687 -0.574 -0.361 1.001
#> sd 0.124 0.028 0.075 0.104 0.121 0.141 0.184 1.003
#> totresdev 47.138 9.902 29.951 40.186 46.287 53.207 68.196 1.001
#> deviance -124.177 9.902 -141.363 -131.128 -125.027 -118.107 -103.118 1.001
#> n.eff
#> d[1] 1
#> d[2] 3000
#> d[3] 3000
#> d[4] 3000
#> d[5] 3000
#> d[6] 3000
#> sd 2300
#> totresdev 3000
#> deviance 3000
#>
#> For each parameter, n.eff is a crude measure of effective sample size,
#> and Rhat is the potential scale reduction factor (at convergence, Rhat=1).
#>
#> DIC info (using the rule, pD = var(deviance)/2)
#> pD = 36.9 and DIC = -88.2
#> DIC is an estimate of expected predictive error (lower deviance is better).
#>
#> $trt.labs
#> [1] "Placebo_0" "alogliptin_6.25" "alogliptin_12.5" "alogliptin_25"
#> [5] "alogliptin_50" "alogliptin_100"
#>
#> $UME
#> [1] FALSE
#>
#> attr(,"class")
#> [1] "nma"
# Draw plot of NMA estimates plotted by dose
plot(nma.alog)
In the alogliptin dataset there appears to be a dose-response relationship, and it also appears to be non-linear.
One additional use of nma.run()
is that is can be used after fitting an MBNMA to ensure that fitting a dose-response function is not leading to poorer model fit than when conducting a conventional NMA. Comparing the total residual deviance between NMA and MBNMA models is useful to identify if introducing a dose-response relationship is leading to poorer model fit. However, it is important to note that if treatments are disconnected in the NMA and have been dropped (drop.discon=TRUE
), there will be fewer observations present in the dataset, which will subsequently lead to lower pD and lower residual deviance, meaning that model fit statistics from NMA and MBNMA may not be directly comparable.
mbnma.run()
MBNMA is performed in MBNMAdose
by applying mbnma.run()
. A "mbnma.network"
object must be provided as the data for mbnma.run()
. The key arguments within mbnma.run()
involve specifying the functional form used to model the dose-response, and the dose-response parameters that comprise that functional form.
Various functional forms are implemented within MBNMAdose
, that allow a variety of parameterizations and dose-response shapes. These are provided as an object of class "dosefun"
to the fun
argument in mbnma.run()
. The interpretation of the dose-response parameter estimates will therefore depend on the dose-response function used. In previous versions of MBNMAdose
(prior to version 0.4.0), wrapper functions were provided for each of the commonly used dose-response functions in mbnma.run()
. For example, mbnma.emax()
is equivalent to mbnma.run(fun=demax())
. This will be deprecated in future versions.
For the following functions \(x_{i,k}\) refers to the dose and \(t_{i,k}\) to the agent in arm \(k\) of study \(i\).
Log-linear (dloglin()
): \(f(x_{i,k}, t_{i,k})=\lambda_{t_{i,k}} \times ln(x_{i,k} + 1)\) where \(lambda\) controls the gradient of the dose-response relationship.
Exponential (dexp()
): \(f(x_{i,k}, t_{i,k})=Emax_{t_{i,k}} (1 - e^{-x_{i,k}})\) where \(Emax\) is the maximum efficacy of an agent.
Emax (demax()
): \(f(x_{i,k}, t_{i,k})=\dfrac{Emax_{t_{i,k}} \times {x_{i,k}^{\gamma_{t_{i,k}}}}} {ED50_{t_{i,k}}^{\gamma_{t_{i,k}}} + x_{i,k}^{\gamma_{t_{i,k}}}}\) where \(Emax\) is the maximum efficacy that can be achieved, \(ED50\) is the dose at which 50% of the maximum efficacy is achieved, and \(\gamma\) is the Hill parameter that controls the sigmoidal shape of the function. By default, demax()
fits a 2-parameter Emax function in which \(\gamma_{t_{i,k}}=1\) (hill=NULL
in function argument).
Polynomial (e.g. linear) (dpoly()
): \(f(x_{i,k}, t_{i,k})=\beta_{1_{t_{i,k}}}x_{i,k}+...+\beta_{p_{t_{i,k}}}x^p_{i,k}\) where \(p\) is the degree of the polynomial (e.g. 1 for linear) and \(\beta_p\) are the coefficients
Fractional polynomial (dfpoly()
): \(f(x_{i,k}, t_{i,k})=\beta_{1_{t_{i,k}}}x_{i,k}^{\gamma_1}+...+\beta_{p_{t_{i,k}}}x^{\gamma_p}_{i,k}\) where \(p\) is the degree of the polynomial, \(\beta_p\) are the coefficients, and \(x_{i,k}^{\gamma_p}\) is a regular power except where \(\gamma_p=0\) where \({x_{i,k}^{(0)}=ln(x_{i,k})}\). If a fractional polynomial power \({\gamma_p}\) repeats within the function it is multiplied by another \({ln(x_{i,k})}\).
Spline functions (dspline()
): B-splines (type="bs"
), natural cubic splines (type="ns"
) and piecewise linear splines (type="ls"
) can be fitted. \(f(x_{i,k}, t_{i,k})=\sum_{p=1}^{P} \beta_{p,t_{i,k}} X_{p,i,k}\) where \(\beta_{p,t_{i,k}}\) is the regression coefficient for the \(p^{th}\) spline and \(X_{1:P,i,k}\) is the basis matrix for the spline, defined by the spline type.
Non-parametric monotonic function (dnonparam()
): Follows the approach of Owen et al. (2015). The direction
can be specified as "increasing"
or "decreasing"
.
User-defined function (duser()
): Any function that can be explicitly defined by the user within (see User-defined dose-response function)
Agent-specific functions (dmulti()
): Allows for a separate dose-response function to be fitted to each agent in the network (see Agent-specific dose-response functions)
Dose-response parameters can be specified in different ways which affects the key parameters estimated by the model and implies different modelling assumptions. Three different specifications are available for each parameter:
"rel"
indicates that relative effects should be pooled for this dose-response parameter separately for each agent in the network. This preserves randomisation within included studies and is likely to vary less between studies (only due to effect modification)."common"
indicates that a single absolute value for this dose-response parameter should be estimated across the whole network that does not vary by agent. This is particularly useful for parameters expected to be constant (e.g. Hill parameters in demax()
or fractional polynomial power parameters in fpoly()
)."random"
indicates that a single absolute value should be estimated separately for each agent, but that all the agent values vary randomly around a single mean absolute network effect. It is similar to "common"
but makes slightly less strong assumptions.numeric()
Assigned a numeric value - this is similar to assigning "common"
, but the single absolute value is assigned as a numeric value by the user, rather than estimated from the data.In mbnma.run()
, an additional argument, method
, indicates what method to use for pooling relative effects and can take either the values "common"
, implying that all studies estimate the same true effect (akin to a “fixed effect” meta-analysis), or "random"
, implying that all studies estimate a separate true effect, but that each of these true effects vary randomly around a true mean effect. This approach allows for modelling of between-study heterogeneity.
If relative effects ("rel"
) are modelled on more than one dose-response parameter then by default, a correlation will be assumed between the dose-response parameters, which will typically improve estimation (provided the parameters are correlated…they usually are). This can be prevented by setting cor=FALSE
.
mbnma.run()
returns an object of class c("rjags", "mbnma")
. summary()
provides posterior medians and 95% credible intervals (95%CrI) for different parameters in the model, naming them by agent and giving some explanation of the way they have been specified in the model. print()
can also be used to give full summary statistics of the posterior distributions for monitored nodes in the JAGS model. Estimates are automatically reported for parameters of interest depending on the model specification (unless otherwise specified in parameters.to.save
).
Dose-response parameters will be named in the output, with a separate coefficient for each agent (if specified as "rel"
). If class effects are modelled, parameters for classes are represented by the upper case name of the dose-response parameter they correspond to (e.g. EMAX
will be the class effects on emax
). The SD of the class effect (e.g. sd.EMAX
, sd.BETA.1
) is the SD of agents within a class for the dose-response parameter they correspond to.
sd
corresponds to the between-study SD. However, sd.
followed by a dose-response parameter name (e.g. sd.emax
, sd.beta.1
) is the between-agent SD for dose response parameters modeled using "common"
or "random"
.
totresdev
is the residual deviance, and deviance
the deviance of the model. Model fit statistics for pD
(effective number of parameters) and DIC
(Deviance Information Criterion) are also reported, with an explanation as to how they have been calculated.
An example MBNMA of the triptans dataset using an Emax dose-response function and common treatment effects that pool relative effects for each agent separately on both Emax and ED50 parameters follows:
# Run an Emax dose-response MBNMA
<- mbnma.run(tripnet, fun = demax(emax = "rel", ed50 = "rel"), method = "random")
mbnma #> 'ed50' parameters are on exponential scale to ensure they take positive values on the natural scale
#> `likelihood` not given by user - set to `binomial` based on data provided
#> `link` not given by user - set to `logit` based on assigned value for `likelihood`
# Print neat summary of output
summary(mbnma)
#> ========================================
#> Dose-response MBNMA
#> ========================================
#>
#> Dose-response function: emax
#>
#> Pooling method
#>
#> Method: Correlation modelled between relative effect dose-response parametersRandom effects estimated for relative effects
#>
#> Parameter Median (95%CrI)
#> -----------------------------------------------------------------------
#> Between-study SD for relative effects 0.239 (0.153, 0.333)
#>
#>
#> emax dose-response parameter results
#>
#> Pooling: relative effects for each agent
#>
#> |Agent |Parameter | Median| 2.5%| 97.5%|
#> |:------------|:---------|------:|------:|------:|
#> |eletriptan |emax[2] | 2.6100| 2.1187| 3.2554|
#> |sumatriptan |emax[3] | 1.8298| 1.4733| 2.4358|
#> |frovatriptan |emax[4] | 1.9754| 1.2806| 3.4233|
#> |almotriptan |emax[5] | 1.8643| 1.2840| 3.0818|
#> |zolmitriptan |emax[6] | 2.1058| 1.5516| 3.0740|
#> |naratriptan |emax[7] | 1.0573| 0.4110| 2.2078|
#> |rizatriptan |emax[8] | 2.5266| 1.8788| 3.9732|
#>
#>
#> ed50 dose-response parameter results
#>
#> Parameter modelled on exponential scale to ensure it takes positive values
#> on the natural scale
#> Pooling: relative effects for each agent
#>
#> |Agent |Parameter | Median| 2.5%| 97.5%|
#> |:------------|:---------|-------:|-------:|-------:|
#> |eletriptan |ed50[2] | -0.6028| -1.2652| -0.0001|
#> |sumatriptan |ed50[3] | -0.4941| -1.3521| 0.2899|
#> |frovatriptan |ed50[4] | -0.4324| -1.6404| 0.6577|
#> |almotriptan |ed50[5] | -0.2325| -1.2778| 0.7638|
#> |zolmitriptan |ed50[6] | -0.3485| -1.2847| 0.4693|
#> |naratriptan |ed50[7] | -0.1063| -1.2855| 1.0801|
#> |rizatriptan |ed50[8] | -0.5466| -1.5010| 0.3936|
#>
#>
#> Model Fit Statistics
#> Effective number of parameters:
#> pD calculated using the Kullback-Leibler divergence = 119.7
#>
#> Deviance = 1095.1
#> Residual deviance = 192
#> Deviance Information Criterion (DIC) = 1214.8
In this example the emax
parameters are the maximum efficacy that can be achieved for each agent. The ed50
parameters are the the dose at which 50% of the maximum efficacy is achieved for each agent. Results for ED50 are given on the log scale as it is constrained to be greater than zero. sd
corresponds to the between-study SD (included because method="random"
).
Instead of estimating a separate relative effect for each agent, a simpler dose-response model that makes stronger assumptions could estimate a single parameter across the whole network for ED50, but still estimate a separate effect for each agent for Emax:
# Emax model with single parameter estimated for Emax
<- mbnma.run(tripnet, fun = demax(emax = "rel", ed50 = "common"), method = "random")
emax #> 'ed50' parameters are on exponential scale to ensure they take positive values on the natural scale
#> `likelihood` not given by user - set to `binomial` based on data provided
#> `link` not given by user - set to `logit` based on assigned value for `likelihood`
summary(emax)
#> ========================================
#> Dose-response MBNMA
#> ========================================
#>
#> Dose-response function: emax
#>
#> Pooling method
#>
#> Method: Random effects estimated for relative effects
#>
#> Parameter Median (95%CrI)
#> -----------------------------------------------------------------------
#> Between-study SD for relative effects 0.238 (0.154, 0.333)
#>
#>
#> emax dose-response parameter results
#>
#> Pooling: relative effects for each agent
#>
#> |Agent |Parameter | Median| 2.5%| 97.5%|
#> |:------------|:---------|------:|------:|------:|
#> |eletriptan |emax[2] | 2.8319| 2.3630| 3.5065|
#> |sumatriptan |emax[3] | 1.8957| 1.6281| 2.2673|
#> |frovatriptan |emax[4] | 2.0896| 1.4126| 2.9551|
#> |almotriptan |emax[5] | 1.7767| 1.3576| 2.3490|
#> |zolmitriptan |emax[6] | 2.1038| 1.6990| 2.6353|
#> |naratriptan |emax[7] | 1.0145| 0.4602| 1.6736|
#> |rizatriptan |emax[8] | 2.7066| 2.1989| 3.4616|
#>
#>
#> ed50 dose-response parameter results
#>
#> Parameter modelled on exponential scale to ensure it takes positive values
#> on the natural scale
#> Pooling: single parameter across all agents in the network
#>
#> |Parameter | Median| 2.5%| 97.5%|
#> |:---------|-------:|-------:|------:|
#> |ed50 | -0.3739| -0.8545| 0.1023|
#>
#>
#> Model Fit Statistics
#> Effective number of parameters:
#> pD calculated using the Kullback-Leibler divergence = 121.1
#>
#> Deviance = 1096.3
#> Residual deviance = 193.2
#> Deviance Information Criterion (DIC) = 1217.4
In this example ed50
only has a single parameter, which corresponds to the dose at which 50% of the maximum efficacy is achieved, assumed to be equal across all agents in the network.
Parameter interpretation depends both on the link scale on which the outcome is modeled, and on the dose-response function used in the model.
For example for a binomial outcome modeled using a logit link function and an Emax dose-response function, the emax
parameter represents the maximum efficacy on the logit scale - it is modeled on the outcome scale and hence is dependent on the link function. As indicated in the help file (?demax()
), the ed50
parameter is modeled on the log-scale to ensure that it takes positive values on the natural scale, but is not modeled on the outcome scale so is not dependent on the link function. Therefore it can be interpreted as the log-dose at which 50% of the maximum efficacy is achieved. The hill
parameter is also modeled on the log-scale, and it can be interpreted as a log-value that controls the sigmoidicity of the dose-response function for the outcome on the logit scale.
For a continuous outcome modeled using link="smd"
, whilst not a true link function it implies modelling Standardised Mean Differences (SMD). For a linear dose-response function (dpoly(degree=1)
), beta.1
represents the change in SMD for each additional unit of dose. For a quadratic dose-response function (dpoly(degree=2)
), beta.2
represents the change in beta.1
for each additional unit of dose.
With some dose-response functions (e.g. splines, fractional polynomials) parameter interpretation can be challenging. The get.relative()
function can make this easier as this allows relative effects to be estimated between agents at specific doses, which is typically much more easily understandable and presentable (see Estimating relative effects).
mbnma.run()
Several additional arguments can be given to mbnma.run()
that require further explanation.
Similar effects between agents within the network can be modelled using class effects. This requires assuming that different agents have some sort of common class effect, perhaps due to similar mechanisms of action. Advantages of this is that class effects can be used to connect agents that might otherwise be disconnected from the network, and they can also provide additional information on agents that might otherwise have insufficient data available to estimate a desired dose-response. The drawback is that this requires making additional assumptions regarding similarity of efficacy.
One difficult of this modelling aspect in particular is that the scales for dose-response parameters must be the same across different agents within a class for this assumption to be valid. For example, in an Emax model it may be reasonable to assume a class effect on the Emax parameter, as this is parameterised on the response scale and so could be similar across agents of the same class. However, the ED50 parameter is parameterised on the dose scale, which is likely to differ for each agent and so an assumption of similarity between agents for this parameter may be less valid. One way to try to account for this issue and make dose scales more consistent across agents is to standardise doses for each agent relative to its “common” dose (see Thorlund et al. (thorlund2015?)), though we expect that this may lead to bias if the common dose is located at a different point along the dose-response curve.
Class effects can only be applied to dose-response parameters which vary by agent. In mbnma.run()
they are supplied as a list, in which each element is named following the name of the corresponding dose-response parameter as defined in the dose-response function. The names will therefore differ when using wrapper functions for mbnma.run()
. The class effect for each dose-response parameter can be either "common"
, in which the effects for each agent within the same class are constrained to a common class effect, or "random"
, in which the effects for each agent within the same class are assumed to be randomly distributed around a shared class mean.
When working with class effects in MBNMAdose
a variable named class
must be included in the original data frame provided to mbnma.network()
. Below we assign a class for two similar agents in the dataset - Naproxcinod and Naproxen. We will estimate separate effects for all other agents, so we set their classes to be equal to their agents.
# Using the osteoarthritis dataset
<- osteopain
pain.df
# Set class equal to agent for all agents
$class <- pain.df$class
pain.df
# Set a shared class (NSAID) only for Naproxcinod and Naproxen
$class[pain.df$agent %in% c("Naproxcinod", "Naproxen")] <- "NSAID"
pain.df
# Run a restricted cubic spline MBNMA with a random class effect on beta.1
<- mbnma.network(pain.df)
classnet <- mbnma.run(classnet, fun = dspline(type = "bs", knots = 2), class.effect = list(beta.1 = "random")) splines
Mean class effects are given in the output as D.ed50
/D.1
parameters. These can be interpreted as the effect of each class for Emax parameters (beta.1
). Note the number of D.ed50
parameters is therefore equal to the number of classes defined in the dataset.
If we had specified that the class effects were "random"
, each treatment effect for Emax (beta.1
) would be assumed to be randomly distributed around its class mean with SD given in the output as sd.D.ed50
/sd.D.1
.
Mean class effects are represented in the output by the upper case name of the dose-response parameter they correspond to. In this case, BETA.1
is the class effects on beta.1
, the first spline coefficient. The SD of the class effect is the SD of agents within a class for the dose-response parameter they correspond to. In this case sd.BETA.1
is the within-class SD for beta.1
.
Users can define their own dose-response function using duser()
rather than using one of the functions provided in MBNMAdose
. The dose-response is specified in terms of beta
parameters and dose
. This allows a huge degree of flexibility when defining the dose-response relationship.
The function assigned needs to fulfil a few criteria to be valid: * dose
must always be included in the function * At least one beta
dose-response parameter must be specified, up to a maximum of four. These must always be named beta.1
, beta.2
, beta.3
and beta.4
, and must be included sequentially (i.e. don’t include beta.3
if beta.2
is not included) * Indices used by JAGS should not be added (e.g. use dose
rather than dose[i,k]
) * Any mathematical/logical operators that can be implemented in JAGS can be added to the function (e.g. exp()
, ifelse()
). See the JAGS manual (2017) for further details.
# Using the depression SSRI dataset
<- mbnma.network(ssri)
depnet
# An example specifying a quadratic dose-response function
<- ~ (beta.1 * dose) + (beta.2 * (dose^2))
quadfun
<- mbnma.run(depnet, fun=duser(fun=quadfun, beta.1 = "rel", beta.2 = "rel"))| quad
Different dose-response functions can be used for different agents within the network. This allows for the modelling of more complex dose-response functions in agents for which there are many doses available, and less complex functions in agents for which there are fewer doses available. Note that these models are typically less computationally stable than single dose-response function models, and they are likely to benefit less from modelling correlation between multiple dose-response parameters since there are fewer agents informing correlations between each dose-response parameter.
This can be modeled using the dmulti()
dose-response function and assigning a list of objects of class "dosefun"
to it. Each element in the list corresponds to an agent in the network (the order of which should be the same as the order of agents in the "mbnma.network"
object). A dose-response function for Placebo should be included in the list, though which function is used is typically irrelevant since evaluating the function at dose=0 will typically equal 0.
# Using the depression SSRI dataset
<- mbnma.network(ssri)
depnet
<- dmulti(list(Placebo = dpoly(degree = 2), citalopram = dpoly(degree = 2),
dr.funs escitalopram = dpoly(degree = 2), fluoxetine = dspline(type = "ns", knots = 2),
paroxetine = dpoly(degree = 2), sertraline = dspline(type = "ns", knots = 2)))
<- mbnma.run(depnet, fun = dr.funs, method = "common", n.iter = 50000)
multifun summary(multifun)
Because an MBNMA model with a linear dose-response function (dpoly(degree=1)
) is mathematically equivalent to a standard NMA model, using agent-specific dose-response functions allows analysis of datasets that both include multiple doses of different drugs and interventions for which a dose-response relationship is not realistic (e.g. surgery) or difficult to assume (e.g. psychotherapy, exercise interventions). Interventions without a dose-response relationship can be coded in the dataset as different agents, each of which should be assigned a dose of 1, and these can then be modeled using a linear dose-response relationship, whilst agents with a plausible dose-response can be assigned a function that appropriately captures their dose-response relationship.
knots
For a more flexible dose-response shape, various different splines can be fitted to the data by using dspline()
. This model is very flexible and can allow for a variety of non-monotonic dose-response relationships, though parameters can be difficult to interpret.
To fit this model, the number/location of knots
(the points at which the different spline pieces meet) should be specified. If a single number is given, it represents the the number of knots to be equally spaced across the dose range of each agent. Alternatively several probabilities can be given that represent the quantiles of the dose range for each agent at which knots should be located.
dspline(type = "bs", knots = 3)
# ...is equivalent to
dspline(type = "bs", knots = c(0.25, 0.5, 0.75))
# Using a natural cubic spline on the SSRI dataset
<- mbnma.network(ssri)
depnet <- mbnma.run(depnet, fun = dspline(type = "ns", knots = c(0.25, 0.5, 0.75))) ns
mbnma.run()
automatically models correlation between relative effects dose-response parameters. This can be prevented by specifying cor=FALSE
in mbnma.run()
. The correlation is modeled using a vague Wishart prior, but this can be made more informative by specifying a scale matrix for the prior. This corresponds to the expectation of the Wishart prior. A different scale matrix can be given to the model in omega
. Each row of the scale matrix corresponds to the 1st, 2nd, 3rd, etc. dose-response parameter that has been modeled using relative effects (as specified in the dose-response function).
Default vague priors for the model are as follows:
\[ \begin{aligned} &d_{p,a} \sim N(0,10000)\\ &beta_{p} \sim N(0,10000)\\ &\sigma \sim N(0,400) \text{ limited to } x \in [0,\infty]\\ &\sigma_{p} \sim N(0,400) \text{ limited to } x \in [0,\infty]\\ &D_{p,c} \sim N(0,1000)\\ &\sigma^D_{p} \sim N(0,400) \text{ limited to } x \in [0,\infty]\\ \end{aligned} \]
…where \(p\) is an identifier for the dose-response parameter (e.g. 1 for Emax and 2 for ED50), \(a\) is an agent identifier and \(c\) is a class identifier.
Users may wish to change these, perhaps in order to use more/less informative priors, but also because the default prior distributions in some models may lead to errors when compiling/updating models.
If the model fails during compilation/updating (i.e. due to a problem in JAGS), mbnma.run()
will generate an error and return a list of arguments that mbnma.run()
used to generate the model. Within this (as within a model that has run successfully), the priors used by the model (in JAGS syntax) are stored within "model.arg"
:
print(mbnma$model.arg$priors)
#> $mu
#> [1] "dnorm(0,0.001)"
#>
#> $sd
#> [1] "dunif(0, 6.021)"
#>
#> $inv.R
#> [1] "dwish(omega[,], 2)"
In this way a model can first be run with vague priors and then rerun with different priors, perhaps to allow successful computation, perhaps to provide more informative priors, or perhaps to run a sensitivity analysis with different priors. Increasing the precision of prior distributions only a little can also often improve convergence considerably.
To change priors within a model, a list of replacements can be provided to priors
in mbnma.run()
. The name of each element is the name of the parameter to change (without indices) and the value of the element is the JAGS distribution to use for the prior. This can include censoring or truncation if desired. Only the priors to be changed need to be specified - priors for parameters that aren’t specified will take default values.
For example, if we want to use tighter priors for the half-normal SD parameters we could increase the precision:
# Define replacement prior
<- list(sd = "dnorm(0, 1) T(0,)")
new.priors
# Run an MBNMA model with new priors
<- mbnma.run(alognet, fun = demax(), method = "random", priors = new.priors) emax
The default value in for pd
in mbnma.run()
is "pv"
, which uses the value automatically calculated in the R2jags
package as pv = var(deviance)/2
. Whilst this is easy to calculate, it is numerically less stable than pD
and may perform more poorly in certain conditions (Gelman, Hwang, and Vehtari 2014).
A commonly-used approach for calculating pD is the plug-in method (pd="plugin"
) (Spiegelhalter et al. 2002). However, this can sometimes result in negative non-sensical values due to skewed posterior distributions for deviance contributions that can arise when fitting non-linear models.
Another approach that is more reliable than the plug-in method when modelling non-linear effects is using the Kullback-Leibler divergence (pd="pd.kl"
) (Plummer 2008). The disadvantage of this approach is that it requires running additional MCMC iterations, so can be slightly slower to calculate.
Finally, pD can also be calculated using an optimism adjustment (pd="popt"
) which allows for calculation of the penalized expected deviance (Plummer 2008). This adjustment allows for the fact that data used to estimate the model is the same as that used to assess its parsimony. It also requires running additional MCMC iterations.
In addition to the arguments specific to mbnma.run()
it is also possible to use any arguments to be sent to R2jags::jags()
. Most of these are likely to relate to improving the performance of MCMC simulations in JAGS and may help with parameter convergence (see [Convergence]). Some of the key arguments that may be of interest are:
n.chains
The number of Markov chains to run (default is 3)n.iter
The total number of iterations per MCMC chainn.burnin
The number of iterations that are discarded to ensure iterations are only saved once chains have convergedn.thin
The thinning rate which ensures that results are only saved for 1 in every n.thin
iterations per chain. This can be increased to reduce autocorrelationOne of the strengths of dose-response MBNMA is that it allows treatments to be connected in a network that might otherwise be disconnected, by linking up different doses of the same agent via the dose-response relationship (Pedder, Dias, Bennetts, et al. 2021). To illustrate this we can generate a version of the gout dataset which excludes placebo (to artificially disconnect the network):
# Generate dataset without placebo
<- gout[!gout$studyID %in% c(2001, 3102), ] # Drop two-arm placebo studies
noplac.gout <- noplac.gout[noplac.gout$agent != "Plac", ] # Drop placebo arm from multi-arm studies
noplac.gout
# Create mbnma.network object
<- mbnma.network(noplac.gout) noplac.net
# Plot network
plot(noplac.net, label.distance = 5)
#> Warning in check.network(g): The following treatments/agents are not connected
#> to the network reference:
#> Allo_300
#> Allo_400
#> Arha_400
#> Arha_600
#> Benz_50
#> Benz_200
#> Febu_40
#> Febu_80
#> Febu_120
#> RDEA_100
#> RDEA_200
#> RDEA_400
This results in a very disconnected network, and if we were to conduct a conventional “split” NMA (whereby different doses of an agent are considered to be independent), we would only be able to estimate relative effects for a very small number of treatments. However, if we assume a dose-response relationship then these different doses can be connected via this relationship, and we can connect up more treatments and agents in the network.
# Network plot at the agent level illustrates how doses can connect using MBNMA
plot(noplac.net, level = "agent", remove.loops = TRUE, label.distance = 4)
#> Warning in check.network(g): The following treatments/agents are not connected
#> to the network reference:
#> Arha
#> RDEA
There are still two agents that do not connect to the network because they involve comparisons of different doses of the same agent. However, multiple doses of an agent within a study allow us to estimate the dose-response relationship and tell us something about the placebo (dose = 0) response - the number of different doses of an agent within a study will determine the degrees of freedom with which we are able to estimate a given dose-response function. Although the placebo response is not estimated directly in the MBNMA framework (it is modelled as a nuisance parameter), it allows us to connect the dose-response function estimated for an agent in one study, with that in another.
To visualise this, we can use the doselink
argument in plot(mbnma.network)
. The integer given to this argument indicates the minimum number of doses from which a dose-response function could be estimated, and is equivalent to the number of parameters in the desired dose-response function plus one. For example for an exponential function, we would require at least two doses on a dose-response curve (including placebo), since this would allow one degree of freedom with which to estimate the one-parameter dose-response function. By modifying the doselink
argument we can determine the complexity of a dose-response function that we might expect to be able to estimate whilst still connecting all agents within the network.
If placebo is not included in the original dataset then this argument will also add a node for placebo to illustrate the connection.
# Network plot assuming connectivity via two doses Allows estimation of a
# single-parameter dose-response function
plot(noplac.net, level = "agent", remove.loops = TRUE, label.distance = 4, doselink = 2)
#> Dose-response connections to placebo plotted based on a dose-response
#> function with 1 degrees of freedom
# Network plot assuming connectivity via three doses Allows estimation of a
# two-parameter dose-response function
plot(noplac.net, level = "agent", remove.loops = TRUE, label.distance = 4, doselink = 3)
#> Warning in check.network(g): The following treatments/agents are not connected
#> to the network reference:
#> Allo
#> Arha
#> Benz
#> Febu
#> Dose-response connections to placebo plotted based on a dose-response
#> function with 2 degrees of freedom
In this way we can fully connect up treatments in an otherwise disconnected network, though unless informative prior information is used this will be limited by the number of doses of agents within included studies. See Pedder et al. (2021) for more details on this.
In addition to the parametric dose-response functions described above, a non-parametric monotonic dose-response relationship can also be specified in mbnma.run()
. fun=dnonparam()
can be used to specify a monotonically increasing (direction="increasing"
) or decreasing (direction="decreasing"
) dose-response respectively. This is achieved in the model by imposing restrictions on the prior distributions of treatment effects that ensure that each increasing dose of an agent has an effect that is either the same or greater than the previous dose. The approach results in a similar model to that developed by Owen et al. (2015).
By making this assumption, this model is slightly more informative, and can lead to some slight gains in precision if relative effects are otherwise imprecisely estimated. However, because a functional form for the dose-response is not modeled, it cannot be used to connect networks that are disconnected at the treatment-level, unlike a parametric MBNMA.
In the case of MBNMA, it may be useful to compare the fit of a non-parametric model to that of a parametric dose-response function, to ensure that fitting a parametric dose-response function does not lead to significantly poorer model fit.
When fitting a non-parametric dose-response model, it is important to correctly choose the expected direction
of the monotonic response, otherwise it can lead to computation error.
<- mbnma.run(tripnet, fun = dnonparam(direction = "increasing"), method = "random")
nonparam #> `likelihood` not given by user - set to `binomial` based on data provided
#> `link` not given by user - set to `logit` based on assigned value for `likelihood`
print(nonparam)
#> Inference for Bugs model at "C:\Users\hp17602\AppData\Local\Temp\Rtmpg7ZQfm\file285c13fa50cb", fit using jags,
#> 3 chains, each with 20000 iterations (first 10000 discarded), n.thin = 10
#> n.sims = 3000 iterations saved
#> mu.vect sd.vect 2.5% 25% 50% 75% 97.5% Rhat
#> d.1[1,1] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[1,2] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[2,2] 1.199 0.175 0.859 1.079 1.200 1.319 1.542 1.001
#> d.1[3,2] 1.744 0.115 1.519 1.664 1.743 1.824 1.964 1.001
#> d.1[4,2] 2.050 0.139 1.774 1.955 2.050 2.145 2.323 1.001
#> d.1[1,3] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[2,3] 0.945 0.144 0.626 0.860 0.957 1.047 1.184 1.003
#> d.1[3,3] 1.118 0.085 0.951 1.061 1.118 1.176 1.289 1.003
#> d.1[4,3] 1.261 0.113 1.050 1.182 1.257 1.336 1.492 1.001
#> d.1[5,3] 1.463 0.085 1.300 1.405 1.461 1.521 1.638 1.002
#> d.1[1,4] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[2,4] 1.245 0.212 0.834 1.103 1.251 1.383 1.662 1.003
#> d.1[3,4] 1.628 0.319 1.060 1.405 1.609 1.836 2.313 1.002
#> d.1[1,5] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[2,5] 0.619 0.244 0.117 0.445 0.627 0.799 1.057 1.003
#> d.1[3,5] 1.035 0.123 0.785 0.954 1.036 1.118 1.282 1.001
#> d.1[4,5] 1.441 0.209 1.060 1.295 1.441 1.585 1.854 1.001
#> d.1[1,6] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[2,6] 0.782 0.303 0.133 0.576 0.820 1.015 1.278 1.004
#> d.1[3,6] 1.252 0.113 1.024 1.179 1.252 1.327 1.472 1.001
#> d.1[4,6] 1.554 0.187 1.222 1.419 1.542 1.680 1.950 1.004
#> d.1[5,6] 1.876 0.266 1.411 1.690 1.857 2.047 2.458 1.002
#> d.1[6,6] 2.923 0.617 1.909 2.460 2.876 3.317 4.243 1.001
#> d.1[1,7] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[2,7] 0.560 0.201 0.169 0.424 0.566 0.695 0.941 1.001
#> d.1[3,7] 1.011 0.311 0.469 0.793 0.983 1.200 1.693 1.001
#> d.1[1,8] 0.000 0.000 0.000 0.000 0.000 0.000 0.000 1.000
#> d.1[2,8] 0.501 0.313 0.027 0.252 0.464 0.714 1.181 1.001
#> d.1[3,8] 1.267 0.163 0.952 1.157 1.266 1.386 1.572 1.007
#> d.1[4,8] 1.610 0.102 1.409 1.544 1.609 1.676 1.812 1.005
#> sd 0.255 0.048 0.164 0.221 0.254 0.286 0.352 1.003
#> totresdev 191.268 19.675 155.302 178.088 190.479 203.926 230.711 1.004
#> deviance 1094.374 19.675 1058.408 1081.194 1093.585 1107.032 1133.817 1.005
#> n.eff
#> d.1[1,1] 1
#> d.1[1,2] 1
#> d.1[2,2] 3000
#> d.1[3,2] 3000
#> d.1[4,2] 3000
#> d.1[1,3] 1
#> d.1[2,3] 800
#> d.1[3,3] 960
#> d.1[4,3] 3000
#> d.1[5,3] 1000
#> d.1[1,4] 1
#> d.1[2,4] 3000
#> d.1[3,4] 3000
#> d.1[1,5] 1
#> d.1[2,5] 2500
#> d.1[3,5] 3000
#> d.1[4,5] 3000
#> d.1[1,6] 1
#> d.1[2,6] 790
#> d.1[3,6] 3000
#> d.1[4,6] 550
#> d.1[5,6] 1000
#> d.1[6,6] 3000
#> d.1[1,7] 1
#> d.1[2,7] 3000
#> d.1[3,7] 3000
#> d.1[1,8] 1
#> d.1[2,8] 3000
#> d.1[3,8] 400
#> d.1[4,8] 420
#> sd 3000
#> totresdev 510
#> deviance 470
#>
#> For each parameter, n.eff is a crude measure of effective sample size,
#> and Rhat is the potential scale reduction factor (at convergence, Rhat=1).
#>
#> DIC info (using the rule, pD = var(deviance)/2)
#> pD = 126.1 and DIC = 1219.7
#> DIC is an estimate of expected predictive error (lower deviance is better).
In the output from non-parametric models, d.1
parameters represent the relative effect for each treatment (specific dose of a specific agent) versus the reference treatment, similar to in a standard Network Meta-Analysis. The first index of d
represents the dose identifier, and the second index represents the agent identifier. Information on the specific values of the doses is not included in the model, as only the ordering of them (lowest to highest) is important.
Note that some post-estimation functions (e.g. ranking, prediction) cannot be performed on non-parametric models within the package.
For looking at post-estimation in MBNMA we will demonstrate using results from an Emax MBNMA on the triptans dataset unless specified otherwise:
<- mbnma.network(triptans)
tripnet #> Values for `agent` with dose = 0 have been recoded to `Placebo`
#> agent is being recoded to enforce sequential numbering and allow inclusion of `Placebo`
<- mbnma.run(tripnet, fun = demax(emax = "rel", ed50 = "rel"))
trip.emax #> 'ed50' parameters are on exponential scale to ensure they take positive values on the natural scale
#> `likelihood` not given by user - set to `binomial` based on data provided
#> `link` not given by user - set to `logit` based on assigned value for `likelihood`
To assess how well a model fits the data, it can be useful to look at a plot of the contributions of each data point to the residual deviance. This can be done using devplot()
. As individual deviance contributions are not automatically monitored in parameters.to.save
, this might require the model to be automatically run for additional iterations.
Results can be plotted either as a scatter plot (plot.type="scatter"
) or a series of boxplots (plot.type="box"
).
# Plot boxplots of residual deviance contributions (scatterplot is the default)
devplot(trip.emax, plot.type = "box")
#> `resdev` not monitored in mbnma$parameters.to.save.
#> additional iterations will be run in order to obtain results for `resdev`
From these plots we can see that whilst the model fit does not seem to be systematically non-linear (which would suggest an alternative dose-response function may be a better fit), residual deviance is high at a dose of 1 for eletriptan, and at 2 for sumatriptan. This may indicate that fitting random effects may allow for additional variability in response which may improve the model fit.
If saved to an object, the output of devplot()
contains the results for individual deviance contributions, and this can be used to identify any extreme outliers.
Another approach for assessing model fit can be to plot the fitted values, using fitplot()
. As with devplot()
, this may require running additional model iterations to monitor theta
.
# Plot fitted and observed values with treatment labels
fitplot(trip.emax)
#> `theta` not monitored in mbnma$parameters.to.save.
#> additional iterations will be run in order to obtain results
Fitted values are plotted as connecting lines and observed values in the original dataset are plotted as points. These plots can be used to identify if the model fits the data well for different agents and at different doses along the dose-response function.
Forest plots can be easily generated from MBNMA models using the plot()
method on an "mbnma"
object. By default this will plot a separate panel for each dose-response parameter in the model. Forest plots can only be generated for parameters which are modelled using relative effects and that vary by agent/class.
plot(trip.emax)
It may be of interest to calculate relative effects between different doses of agents to obtain outputs that are more similar to those from standard NMA. Relative effects can take the form of odds ratios, mean differences or rate ratios, depending on the likelihood and link function used in a model. Estimating relative effects can be particularly helpful for dose-response functions where parameter interpretation can be challenging (e.g. splines, fractional polynomials).
The get.relative()
function allows for calculation of relative effects between any doses of agents as specified by the user. This includes doses not available in the original dataset, as these can be estimated via the dose-response relationship. Optional arguments allow for calculation of 95% prediction intervals rather than 95% credible intervals (the default), and for the conversion of results from the log to the natural scale. The resulting relative effects can also be ranked (see Ranking for more details).
# Specify treatments (agents and doses) for which to estimate relative effects
<- list(Placebo = 0, eletriptan = 1, sumatriptan = 2, almotriptan = 1)
treats
# Print relative effects on the natural scale
<- get.relative(trip.emax, treatments = treats, eform = TRUE)
rels print(rels)
#> ============================================================
#> Relative treatment comparisons (95% credible intervals)
#> ============================================================
#>
#> Placebo_0 0.18 (0.16, 0.21) 0.25 (0.22, 0.28) 0.36 (0.32, 0.42)
#> 5.5 (4.8, 6.3) eletriptan_1 1.4 (1.2, 1.6) 2 (1.7, 2.4)
#> 4 (3.6, 4.5) 0.73 (0.64, 0.84) sumatriptan_2 1.5 (1.3, 1.7)
#> 2.8 (2.4, 3.2) 0.5 (0.42, 0.6) 0.68 (0.58, 0.8) almotriptan_1
# Rank relative effects
rank(rels)
#>
#> ================================
#> Ranking of dose-response MBNMA
#> ================================
#>
#> Includes ranking of relative effects between treatments from dose-response MBNMA
#>
#> 4 agents/classes/predictions ranked with negative responses being `worse`
#>
#> Relative Effects ranking (from best to worst)
#>
#> |Treatment | Mean| Median| 2.5%| 97.5%|
#> |:-------------|----:|------:|----:|-----:|
#> |Placebo_0 | 1| 1| 1| 1|
#> |almotriptan_1 | 2| 2| 2| 2|
#> |sumatriptan_2 | 3| 3| 3| 3|
#> |eletriptan_1 | 4| 4| 4| 4|
Rankings can be calculated for different dose-response parameters from MBNMA models by using rank()
on an "mbnma"
object. Any parameter monitored in an MBNMA model that varies by agent/class can be ranked. A vector of these is assigned to params
. lower_better
indicates whether negative responses should be ranked as “better” (TRUE
) or “worse” (FALSE
).
<- rank(trip.emax, lower_better = FALSE)
ranks print(ranks)
#>
#> ================================
#> Ranking of dose-response MBNMA
#> ================================
#>
#> Includes ranking of relative effects from dose-response MBNMA:
#> emax ed50
#>
#> 7 agents/classes/predictions ranked with positive responses being `better`
#>
#> emax ranking (from best to worst)
#>
#> |Treatment | Mean| Median| 2.5%| 97.5%|
#> |:------------|----:|------:|----:|-----:|
#> |naratriptan | 1.24| 1| 1| 4|
#> |sumatriptan | 2.84| 3| 1| 5|
#> |almotriptan | 3.62| 3| 2| 7|
#> |frovatriptan | 3.71| 4| 1| 7|
#> |zolmitriptan | 4.27| 4| 2| 7|
#> |rizatriptan | 5.90| 6| 4| 7|
#> |eletriptan | 6.42| 7| 5| 7|
#>
#>
#> ed50 ranking (from best to worst)
#>
#> |Treatment | Mean| Median| 2.5%| 97.5%|
#> |:------------|----:|------:|----:|-----:|
#> |eletriptan | 2.61| 2| 1| 6|
#> |sumatriptan | 2.95| 3| 1| 6|
#> |rizatriptan | 3.46| 3| 1| 7|
#> |frovatriptan | 3.80| 4| 1| 7|
#> |zolmitriptan | 4.32| 5| 1| 7|
#> |naratriptan | 5.34| 6| 1| 7|
#> |almotriptan | 5.53| 6| 1| 7|
summary(ranks)
#> $emax
#> rank.param mean sd 2.5% 25% 50% 75% 97.5%
#> 1 eletriptan 6.422667 0.7546806 5 6 7 7 7
#> 2 sumatriptan 2.835000 0.9194510 1 2 3 3 5
#> 3 frovatriptan 3.714667 1.5727077 1 2 4 5 7
#> 4 almotriptan 3.616000 1.4275468 2 2 3 5 7
#> 5 zolmitriptan 4.272000 1.2395677 2 3 4 5 7
#> 6 naratriptan 1.235000 0.8763738 1 1 1 1 4
#> 7 rizatriptan 5.904667 0.9848358 4 5 6 7 7
#>
#> $ed50
#> rank.param mean sd 2.5% 25% 50% 75% 97.5%
#> 1 eletriptan 2.605333 1.362176 1 1 2 4 6
#> 2 sumatriptan 2.945333 1.519358 1 2 3 4 6
#> 3 frovatriptan 3.797667 2.045513 1 2 4 6 7
#> 4 almotriptan 5.529333 1.544647 1 5 6 7 7
#> 5 zolmitriptan 4.315667 1.762117 1 3 5 6 7
#> 6 naratriptan 5.343000 1.894346 1 4 6 7 7
#> 7 rizatriptan 3.463667 1.717847 1 2 3 5 7
The output is an object of class("mbnma.rank")
, containing a list for each ranked parameter in params
, which consists of a summary table of rankings and raw information on agent/class (depending on argument given to level
) ranking and probabilities. The summary median ranks with 95% credible intervals can be simply displayed using summary()
.
Histograms for ranking results can also be plotted using the plot()
method, which takes the raw MCMC ranking results stored in mbnma.rank
and plots the number of MCMC iterations the parameter value for each treatment was ranked a particular position.
# Ranking histograms for Emax
plot(ranks, params = "emax")
# Ranking histograms for ED50
plot(ranks, params = "ed50")
Alternatively, cumulative ranking plots for all parameters can be plotted simultaneously so as to be able to compare the effectiveness of different agents on different parameters. The surface under cumulative ranking curve (SUCRA) for each parameter can also be estimated by setting sucra=TRUE
.
# Cumulative ranking plot for both dose-response parameters
cumrank(ranks, sucra = TRUE)
#> # A tibble: 14 x 3
#> agent parameter sucra
#> <fct> <chr> <dbl>
#> 1 eletriptan ed50 4.77
#> 2 eletriptan emax 1.08
#> 3 sumatriptan ed50 4.45
#> 4 sumatriptan emax 4.65
#> 5 frovatriptan ed50 3.60
#> 6 frovatriptan emax 3.76
#> 7 almotriptan ed50 1.96
#> 8 almotriptan emax 3.87
#> 9 zolmitriptan ed50 3.14
#> 10 zolmitriptan emax 3.22
#> 11 naratriptan ed50 2.12
#> 12 naratriptan emax 5.81
#> 13 rizatriptan ed50 3.96
#> 14 rizatriptan emax 1.60
After performing an MBNMA, responses can be predicted from the model parameter estimates using predict()
on an "mbnma"
object. A number of important arguments should be specified for prediction. See ?predict.mbnma
for detailed specification of these arguments.
E0
This is the response at dose = 0 (equivalent to the placebo response). Since relative effects are the parameters estimated in MBNMA, the placebo response is not explicitly modelled and therefore must be provided by the user in some way. The simplest approach is to provide either a single numeric value for E0
(deterministic approach), or a string representing a distribution for E0
that can take any Random Number Generator (RNG) distribution for which a function exists in R (stochastic approach). Values should be given on the natural scale. For example for a binomial outcome:
E0 <- 0.2
E0 <- "rbeta(n, shape1=2, shape2=10)"
Another approach is to estimate E0
from a set of studies. These would ideally be studies of untreated/placebo-treated patients that closely resemble the population for which predictions are desired, and the studies may be observational. However, synthesising results from the placebo arms of trials in the original network is also possible. For this, E0
is assigned a data frame of studies in the long format (one row per study arm) with the variables studyID
, and a selection of y
, se
, r
, n
and E
(depending on the likelihood used in the MBNMA model). synth
can be set to "fixed"
or "random"
to indicate whether this synthesis should be fixed or random effects.
<- triptans[triptans$dose == 0, ] E0
Additionally, it’s also necessary to specify the doses at which to predict responses. By default, predict()
uses the maximum dose within the dataset for each agent, and predicts doses at a series of cut points. The number of cut points can be specified using n.doses
, and the maximum dose to use for prediction for each agent can also be specified using max.doses
(a named list of numeric values where element names correspond to agent names).
An alternative approach is to predict responses at specific doses for specific agents using the argument exact.doses
. As with max.doses
, this is a named list in which element names correspond to agent names, but each element is a numeric vector in which each value within the vector is a dose at which to predict a response for the given agent.
# Predict 20 doses for each agent, with a stochastic distribution for E0
<- list(Placebo = 0, eletriptan = 3, sumatriptan = 3, almotriptan = 3, zolmitriptan = 3,
doses naratriptan = 3, rizatriptan = 3)
<- predict(trip.emax, E0 = "rbeta(n, shape1=2, shape2=10)", max.doses = doses,
pred n.dose = 20)
# Predict exact doses for two agents, and estimate E0 from the data
<- triptans[triptans$dose == 0, ]
E0.data <- list(eletriptan = c(0, 1, 3), sumatriptan = c(0, 3)) doses
<- predict(trip.emax, E0 = E0.data, exact.doses = doses)
pred #> Values for `agent` with dose = 0 have been recoded to `Placebo`
#> agent is being recoded to enforce sequential numbering and allow inclusion of `Placebo`
An object of class "mbnma.predict"
is returned, which is a list of summary tables and MCMC prediction matrices for each treatment (combination of dose and agent). The summary()
method can be used to print mean posterior predictions at each time point for each treatment.
summary(pred)
#> agent dose mean sd 2.5% 25% 50%
#> 1 Placebo 0 0.1237035 0.003239595 0.1173407 0.1215232 0.1236573
#> 2 eletriptan 0 0.1237035 0.003239595 0.1173407 0.1215232 0.1236573
#> 3 eletriptan 1 0.4376176 0.018483069 0.4023754 0.4250831 0.4374878
#> 4 eletriptan 3 0.5566460 0.026369875 0.5047708 0.5389932 0.5572327
#> 5 sumatriptan 0 0.1237035 0.003239595 0.1173407 0.1215232 0.1236573
#> 6 sumatriptan 3 0.3867605 0.017611024 0.3528898 0.3744556 0.3863374
#> 75% 97.5%
#> 1 0.1258338 0.1302874
#> 2 0.1258338 0.1302874
#> 3 0.4504488 0.4726760
#> 4 0.5736161 0.6068271
#> 5 0.1258338 0.1302874
#> 6 0.3988693 0.4213130
Predicted responses can also be plotted using the plot()
method on an object of class("mbnma.predict")
. The predicted responses are joined by a line to form the dose-response curve for each agent predicted, with 95% credible intervals (CrI). Therefore, when plotting the response it is important to predict a sufficient number of doses (using n.doses
) to get a smooth curve.
# Predict responses using default doses up to the maximum of each agent in the
# dataset
<- predict(trip.emax, E0 = 0.2, n.dose = 20)
pred
plot(pred)
Shaded counts of the number of studies in the original dataset that investigate each dose of an agent can be plotted over the 95% CrI for each treatment by setting disp.obs = TRUE
, though this requires that the original "mbnma.network"
object used to estimate the MBNMA be provided via network
.
plot(pred, disp.obs = TRUE)
#> 66 placebo arms in the dataset are not shown within the plots
This can be used to identify any extrapolation/interpretation of the dose-response that might be occurring for a particular agent. As you can see, more observations typically leads to tighter 95% CrI for the predicted response at a particular point along the dose-response curve.
We can also plot the results of a “split” Network Meta-Analysis (NMA) in which all doses of an agent are assumed to be independent. As with disp.obs
we also need to provide the original mbnma.network
object to be able to estimate this, and we can also specify if we want to perform a common or random effects NMA using method
. Treatments that are only connected to the network via the dose-response relationship (rather than by a direct head-to-head comparison) will not be included.
<- mbnma.network(alog_pcfb)
alognet <- mbnma.run(alognet, fun = demax(), method = "random")
alog.emax <- predict(alog.emax, E0 = 0, n.dose = 20)
pred plot(pred, overlay.split = TRUE, method = "random")
By plotting these, as well as observing how responses can be extrapolated/interpolated, we can also see which doses are likely to be providing most information to the dose-response relationship. The tighter 95% CrI on the predicted responses from the MBNMA also show that modelling the dose-response function also gives some additional precision even at doses for which there is information available.
More detailed documentation can be accessed using ?plot.mbnma.predict
.
Predicted responses from an object of class("mbnma.predict")
can also be ranked using the rank()
method. As when applied to an object of class("mbnma")
, this method will rank parameters (in this case predictions) in order from either highest to lowest (direction=1
) or lowest to highest (direction=-1
), and return an object of class("mbnma.rank")
.
If there have been predictions at dose = 0 for several agents only one of these will be included in the rankings, in order to avoid duplication (since the predicted response at dose = 0 is the same for all agents).
<- predict(trip.emax, E0 = 0.2, n.doses = 4, max.doses = list(eletriptan = 5,
pred sumatriptan = 5, frovatriptan = 5, zolmitriptan = 5))
<- rank(pred)
ranks plot(ranks)
When performing a MBNMA by pooling relative treatment effects, the modelling approach assumes consistency between direct and indirect evidence within a network. This is an incredibly useful assumption as it allows us to improve precision on existing direct estimates, or to estimate relative effects between treatments that have not been compared in head-to-head trials, by making use of indirect evidence.
However, if this assumption does not hold, this is extremely problematic for inference, so it is important to be able to test it. A number of different approaches exist to allow for this in standard Network Meta-Analysis (NMA) (Dias et al. 2013), but within dose-response MBNMA there is added complexity because the consistency assumption can be conceptualised either for each treatment comparison (combination of dose and agent), or for each agent, where consistency is required for the agent-level parameters governing the dose-response relationship. A detailed description of consistency testing in MBNMA models is given in Pedder et al. (2021).
Testing for consistency at the agent-level is challenging as there is unlikely to be the required data available to be able to do this - included studies in the dataset must have multiple doses of multiple agents, so that sufficient information is available to estimate dose-response parameters within that study. However, testing for consistency at the treatment-level is possible in MBNMA, and this is described below. In practice, testing for consistency at the treatment-level should suffice, as any inconsistency identified at the treatment level should also translate to inconsistency at the agent level and vice versa (Pedder, Dias, Boucher, et al. 2021).
Consistency also depends on the functional form assumed for the dose-response relationship, and so is inextricably linked to model fit of the dose-response relationship. A thorough assessment of the validity of the fitted model is therefore important to be confident that the resulting treatment effect estimates provide a firm basis for decision making.
When meta-analysing dose-response studies, the potential for inconsistency testing may actually be reasonably rare, as most (if not all) trials will be multi-arm placebo-controlled. Since each study is internally consistent (the relative effects within the trial will always adhere to consistency relationships), there will be no closed loops of treatments that are informed by independent sources of evidence.
Another approach for consistency checking is node-splitting. This splits contributions for a particular treatment comparison into direct and indirect evidence, and the two can then be compared to test their similarity (Valkenhoef et al. 2016). Node-splitting in dose-response MBNMA is an extension to this method, as indirect evidence contributions can be calculated incorporating the dose-response function. mbnma.nodesplit()
takes similar arguments to mbnma.run()
, and returns an object of class("nodesplit")
.
In addition to these, the argument comparisons
can be used to indicate which treatment comparisons to perform a nodesplit on. If left as NULL
(the default) node-splits will automatically be performed in all closed loops of treatments in which comparisons are informed by independent sources of evidence. This is somewhat similar to the function gemtc::mtc.nodesplit.comparisons()
, but uses a fixed network reference treatment and therefore ensures differences between direct and indirect evidence are parameterised as inconsistency rather than as heterogeneity (Dias et al. 2013). However, it also allows for indirect evidence to be informed via the dose-response relationship even if there is no pathway of evidence between the treatments, which can in fact lead to additional potentially inconsistent loops. To incorporate indirect evidence in this way incldr=TRUE
can be set in inconsistency.loops()
, the default when using mbnma.nodesplit()
The complexity of the dose-response relationship fitted and the amount of indirect evidence available will also affect the number of comparisons on which node-splitting is possible (Pedder, Dias, Boucher, et al. 2021). If there is only limited indirect dose-response information for a given comparison (e.g. only two doses available for the agents in the comparison), then only a simpler dose-response function (e.g. exponential) can be fitted. The values given in inconsistency.loops()$path
can give an indication as to the number of doses available for each comparison. For example, drparams 3 4
would indicate that the indirect evidence is estimated only via the dose-response relationship, and that within the indirect evidence there are three doses available for estimating the dose-response of the agent in t1
of the comparison, and four doses available for estimating the dose-responses of the agent in t2
of the comparison. This means that a three-parameter dose-response function would be the most complex function that could be used when node-splitting this comparison.
As several models have to be run for each closed loop of treatments, node-splitting can take some time to run, and it therefore is not shown for the purposes of this vignette.
# Using the psoriasis dataset (>75% improvement in PASI score)
$r <- psoriasis$r75
psoriasis<- mbnma.network(psoriasis)
psorinet
# Identify comparisons on which node-splitting is possible
<- inconsistency.loops(psorinet$data.ab, incldr = TRUE)
splitcomps print(splitcomps)
# If we want to fit an Emax dose-response function, there is insufficient
# indirect evidence in all but the first 6 comparisons
<- mbnma.nodesplit(psorinet, fun = demax(), comparisons = splitcomps[1:6,
nodesplit method = "common") ],
print(nodesplit)
Performing the print()
method on an object of class("nodesplit")
prints a summary of the node-split results to the console, whilst the summary()
method will return a data frame of posterior summaries for direct and indirect estimates for each split treatment comparison.
The nodesplit object itself is a list with results for each treatment comparison that has been split. There is a lot of information within the results, but the most useful (and easily interpretable) elements are:
p.values
the Bayesian p-value for the posterior overlap between direct and indirect estimatesquantiles
the median and 95%CrI of the posterior distributions for direct and indirect evidence, and for the difference between them.forest.plot
a forest plot that shows the median and 95% CrI for direct and indirect estimatesdensity.plot
a plot that shows the posterior distributions for direct and indirect estimatesIt is possible to generate different plots of each nodesplit comparison using plot()
:
# Plot forest plots of direct, indirect and pooled (MBNMA) results for each
# comparison
plot(nodesplit, plot.type = "forest")
# Plot posterior densities of direct and indirect results for each nodesplit
# comparisons
plot(nodesplit, plot.type = "density")
MBNMAdose
runs Bayesian models in JAGS, which uses Markov Chain Monte Carlo (MCMC) simulation. However, the validity of results is reliant on the MCMC chains having converged successfully on the posterior densities of all parameters in the model. For highly parameterised models run on relatively limited data, as is often the case with MBNMA models, convergence can often be an challenge. Note that convergence is necessary to be able to compare models and evaluate model fit. However, successful convergence does not imply good model fit.
A full explanation of how to facilitate and to check for convergence is outside the scope of this vignette, but below are some simple steps for checking convergence. None of these steps alone ensures convergence has been successful, but interpretation of them jointly can provide strong evidence of it.
"mbnma"
or "nma"
object is printed.An HTML document with all the above convergence plots can easily be generated for all parameters in the model simultaneously using mcmcplots::mcmcplot()
.
Two steps may improve convergence when using MBNMAdose
. One step is to run models for more iterations (this can be done using the n.iter
argument in mbnma.run()
). It can take time for MCMC chains to converge, particularly for non-linear models with limited data. It is important to note that chains should only be monitored after they have converged - increasing the number of burn-in iterations ensures that this is the case (using the n.burnin
argument in mbnma.run()
). Another method to improve convergence is by providing more information to the model via informative priors.
MBNMAdose
provides a complete set of functions that allow for performing dose-response MBNMA, model checking, prediction, and plotting of a number of informative graphics. By modelling a dose-response relationship within the network meta-analysis framework, this method can help connect networks of evidence that might otherwise be disconnected, allow extrapolation and interpolation of dose-response, and improve precision on predictions and relative effects between agents.
The package allows a range of dose-response functions (as well as the possibility to incorporate user-defined functions) and facilitates model specification in a way which allows users to make additional modelling assumptions to help identify parameters.