data(meta.data)
xyplot(surv~time|factor(trt,lab=c("Control","Treated")),
xlim=c(0,6),xlab="Time",ylab="S(t)",
group=factor(group,lab=paste("Trial",9:10)),
meta.data,type="b",aspect=1,
auto.key=TRUE)
Run the code above in your browser using DataLab