Additional file 10 of A Bayesian non-inferiority approach using experts’ margin elicitation – application to the monitoring of safety events

Example of the code to simulate the results for one event (neonatal death): In the part A, it fit margins from experts’ elicitation, using a fictive data set of experts’ answers (E1). In the part B, it simulate the trials and compute the differences of the posterior samplers for M pairs, for one scenario, using one informative prior. In the part C, it calculate the posterior probability that the difference of rate of events is higher than the acceptable difference according to experts, and compute the decision using a threshold of 0.50. (R 26 kb)