# NOT RUN {
lst.var <- list(trt="TRT", surv="SURV", outcome=c("Y1","Y2"), y0=NULL,
endp=c("Y2"), unitTime="days",
trt.label = c("UC+SBT", "SAT+SBT"),
cov=c("AGE"), endfml="Y2", duration=365, bounds=c(0,100));
rst.fit <- imFitModel(abc, lst.var);
# }
Run the code above in your browser using DataLab