data(simScenario5)
xform<-oceFormat(data=simScenario5,oceTime=c("T1","T2","T3"),
oceStatus=c("I1","I2","I3"),
group="Z",outputDataFrame=TRUE)
# perform cox regression using time varying treatment efects, IZ1,IZ2, IZ3
# associated with the 3 prioritized endpoints
cout<- coxph(Surv(START, STOP, status) ~ IZ1+IZ2+IZ3, data=xform$data)
coxph2WR(cout)
Run the code above in your browser using DataLab