AGSDest (version 2.3.4)

as.AGST: as Adaptive Group Sequential Trial

Description

Function as.AGST builds an adaptive group sequential trial object

Usage

as.AGST(pT, iD, sT, sTo = NULL)

Arguments

pT

object of the class GSTobj; primary trial design

iD

interim data; a list with the variables T and z; list(T = stage of interim analysis, z = interim z-statistic)

sT

object of the class GSTobj; secondary trial design

sTo

secondary trial outcome; a list with the variables T and z; list(T = stage where trial stops, z = z-statistic at stage where trial stops)

Value

Returns a list containing the pT, iD, sT and sTo with class=AGSTobj

See Also

AGSTobj

Examples

# NOT RUN {
pT=plan.GST(K=3,SF=4,phi=-4,alpha=0.05,delta=6,pow=0.9,compute.alab=TRUE,compute.als=TRUE)
iD=list(T=1, z=1.090728)
swImax=0.0625
I2min=3*swImax
I2max=3*swImax

sT=adapt(pT=pT,iD=iD,SF=1,phi=0,cp=0.8,theta=5,I2min,I2max,swImax)
sTo=list(T=2, z=2.393)
AGST <- as.AGST(pT=pT,iD=iD,sT=sT,sTo=sTo)
# }