Phase123 (version 2.1)

Reoptimize1: Gives the Optimal Dose for enrolling next patient cohort. Used in the SimPhase123 function.

Description

This function returns the optimal dose number to assign the next patient cohort or stops the trial if no dose is deemed acceptable.

Usage

Reoptimize1(Y, I, YE, YT, Doses, Dose, Hypermeans, Hypervars, B)

Arguments

Y

Vector containing observed patient survival or follow up times.

I

Vector indicating whether each patient experienced an exent.

YE

Vector containing observed efficacy indicators.

YT

Vector containing observed toxicity indicators.

Doses

Vector containing standardized doses of patients in trial.

Dose

Vector containing the standardized doses considered.

Hypermeans

Vector containing prior hypermeans of length 6 for Eff-Tox parameters.

Hypervars

Vector containing prior hypervariances of length 6 for Eff-Tox parameters.

B

Number of iterations to perform in the MCMC.

References

[1] Chapple and Thall (2018).A Hybrid Phase I-II/III Clinical Trial Design Allowing Dose Re-Optimization in Phase III. Biometrics. In Press,

Examples

# NOT RUN {
##Doses, YE,YT
Doses= c(1,1,1,2,2,2,1,1,1,3,3,3,1,1,1,2,2,2)
YE = c(0,0,1,1,1,0,0,0,0,1,1,1,0,0,1,1,1,0)
YT=c(0,0,0,1,1,0,1,0,0,1,1,1,0,0,0,1,0,0)
Y=rexp(length(YE))
I=rbinom(length(YE),1,.9)
##Vector of Numerical Doses
Dose = c(1,2,3,3.5,5)
Dose=(Dose-mean(Dose))/sd(Dose)
##Hypermeans for Eff-Tox
Hypermeans = c(.022,3.45,0,-4.23,3.1,0)
Hypervars = c(2.6761, 2.6852, .2, 3.1304, 3.1165, 1)
Hypervars=Hypervars^2
###Number of iterations
B=20000
Reoptimize1(Y,I,YE,YT, Doses, Dose, Hypermeans,  Hypervars,B)
# }