| MAPprior_bin {NCC} | R Documentation | 
Analysis for binary data using the MAP Prior approach
Description
This function performs analysis of binary data using the Meta-Analytic-Predictive (MAP) Prior approach. The method borrows data from non-concurrent controls to obtain the prior distribution for the control response in the concurrent periods.
Usage
MAPprior_bin(
  data,
  arm,
  alpha = 0.025,
  opt = 2,
  prior_prec_tau = 4,
  prior_prec_eta = 0.001,
  n_samples = 1000,
  n_chains = 4,
  n_iter = 4000,
  n_adapt = 1000,
  robustify = TRUE,
  weight = 0.1,
  check = TRUE,
  ...
)
Arguments
| data | Data frame with trial data, e.g. result from the  | 
| arm | Integer. Index of the treatment arm under study to perform inference on (vector of length 1). This arm is compared to the control group. | 
| alpha | Double. Decision boundary (one-sided). Default=0.025 | 
| opt | Integer (1 or 2). If opt==1, all former periods are used as one source; if opt==2, periods get separately included into the final analysis. Default=2. | 
| prior_prec_tau | Double. Precision parameter ( | 
| prior_prec_eta | Double. Precision parameter ( | 
| n_samples | Integer. Number of how many random samples will get drawn for the calculation of the posterior mean, the p-value and the CI's. Default=1000. | 
| n_chains | Integer. Number of parallel chains for the rjags model. Default=4. | 
| n_iter | Integer. Number of iterations to monitor of the jags.model. Needed for coda.samples. Default=4000. | 
| n_adapt | Integer. Number of iterations for adaptation, an initial sampling phase during which the samplers adapt their behavior to maximize their efficiency. Needed for jags.model. Default=1000. | 
| robustify | Logical. Indicates whether a robust prior is to be used. If TRUE, a mixture prior is considered combining a MAP prior and a weakly non-informative component prior. Default=TRUE. | 
| weight | Double. Weight given to the non-informative component (0 < weight < 1) for the robustification of the MAP prior according to Schmidli (2014). Default=0.1. | 
| check | Logical. Indicates whether the input parameters should be checked by the function. Default=TRUE, unless the function is called by a simulation function, where the default is FALSE. | 
| ... | Further arguments passed by wrapper functions when running simulations. | 
Details
The MAP approach derives the prior distribution for the control response in the concurrent periods by combining the control information from the non-concurrent periods with a non-informative prior.
The model for the binary response y_{js} for the control patient j in the non-concurrent period s is defined as follows:
g(E(y_{js})) = \eta_s
where g(\cdot) denotes the logit link function and \eta_s represents the control log odds in the non-concurrent period s.
The log odds for the non-concurrent controls in period s are assumed to have a normal prior distribution with mean \mu_{\eta} and variance \tau^2:
\eta_s \sim \mathcal{N}(\mu_{\eta}, \tau^2)
For the hyperparameters \mu_{\eta} and \tau, normal and half-normal hyperprior distributions are assumed, with mean 0 and variances \sigma^2_{\eta} and \sigma^2_{\tau}, respectively:
\mu_{\eta} \sim \mathcal{N}(0, \sigma^2_{\eta})
\tau \sim HalfNormal(0, \sigma^2_{\tau})
The MAP prior distribution p_{MAP}(\eta_{CC}) for the control response in the concurrent periods is then obtained as the posterior distribution of the parameters \eta_s from the above specified model.
If robustify=TRUE, the MAP prior is robustified by adding a weakly-informative mixture component p_{\mathrm{non-inf}}, leading to a robustified MAP prior distribution:
p_{rMAP}(\eta_{CC}) = (1-w) \cdot p_{MAP}(\eta_{CC}) + w \cdot p_{\mathrm{non-inf}}(\eta_{CC})
where w (parameter weight) may be interpreted as the degree of skepticism towards borrowing strength.
In this function, the argument alpha corresponds to 1-\gamma, where \gamma is the decision boundary. Specifically, the posterior probability of the difference distribution under the null hypothesis is such that:
P(p_{treatment}-p_{control}>0) \ge 1-alpha.
In case of a non-informative prior this coincides with the frequentist type I error.
Value
List containing the following elements regarding the results of comparing arm to control:
-  p-val- posterior probability that the log-odds ratio is less than zero
-  treat_effect- posterior mean of log-odds ratio
-  lower_ci- lower limit of the (1-2*alpha)*100% credible interval for log-odds ratio
-  upper_ci- upper limit of the (1-2*alpha)*100% credible interval for log-odds ratio
-  reject_h0- indicator of whether the null hypothesis was rejected or not (p_val<alpha)
Author(s)
Katharina Hees
References
Robust meta-analytic-predictive priors in clinical trials with historical control information. Schmidli, H., et al. Biometrics 70.4 (2014): 1023-1032.
Applying Meta-Analytic-Predictive Priors with the R Bayesian Evidence Synthesis Tools. Weber, S., et al. Journal of Statistical Software 100.19 (2021): 1548-7660.
Examples
trial_data <- datasim_bin(num_arms = 3, n_arm = 100, d = c(0, 100, 250),
p0 = 0.7, OR = rep(1.8, 3), lambda = rep(0.15, 4), trend="stepwise")
MAPprior_bin(data = trial_data, arm = 3)