Get posterior model weights for several empiric CRM skeletons.

Get posterior model weights for several empiric CRM skeletons, assuming a normal prior on the beta model parameter

get_empiric_crm_skeleton_weights(
  skeletons,
  events_at_dose,
  n_at_dose,
  prior = rep(1, nrow(skeletons))
)

Arguments

skeletons

matrix with one skeleton per row, so that the number of columns is the number of doses under investigation.

events_at_dose

integer vector of number of events at doses

n_at_dose

integer vector of number of patients at doses

prior

vector of prior model weights. Length should be same as number of rows in skeletons. Default is equal weighting.

Value

numerical vector, posterior weights of the skeletons.