randomization_phase {crm12Comb}

Adaptive randomization

Description

This function is used to perform adaptive randomization for next patient or cohort of patients allocation when the current sample size is less than a pre-specified number.

Usage

randomization_phase(pE_est, seed_r=NULL)

Arguments

pE_est

A vector of estimated efficacy probability in the acceptable set.

seed_r

An integer for the seed to generate random numbers used in randomization phase, default is NULL.

Details

The dose combination for next patient or cohort of patients allocation is d_i with probability

R_i = \frac{\hat{\pi}_E(d_i)}{\sum_i\hat{\pi}_E(d_i)}.

Value

A number is returned indicating the dose level for next patient or cohort of patients allocation.

Examples

# Assume the estimated prbabilities for each dose combination in the acceptable set as:
p_est <- c(0.1, 0.2, 0.3, 0.4)
# Dose level for next enrolled patient or cohort of patients is:
d <- randomization_phase(p_est)