data(DLBCLpatients)
### Kaplan and Meier estimation of the patient survival
plot(survfit(Surv(t, f) ~ 1, data = DLBCLpatients),
xlab="Survival time (in years)", ylab="Patient survival",
mark.time=FALSE)
Run the code above in your browser using DataLab