data(sim_data)
##load survival data
time <- sim_data$event_time
event <- sim_data$event_status
group <- sim_data$group
stratum <- sim_data$strata
##perform stratified max-combo test
SMCtest(time,event,group,stratum,alternative="two.sided",rho=c(0,1,1,0),gamma=c(0,0,1,1))
Run the code above in your browser using DataLab