title: “Survie_G.Pierre” author: “Siham” date: “15/09/2021” output: html_document: toc: yes toc_float: yes pdf_document: toc: yes —

KM_golbal1<-survfit(Surv(temps,Recidive_apres.1_PEC_IC)~1, data=survie)
KM_golbal1

## Call: survfit(formula = Surv(temps, Recidive_apres.1_PEC_IC) ~ 1, data = survie)
## 
##       n  events  median 0.95LCL 0.95UCL 
##      74      12     153     138      NA

time=survie$temps
event=survie$Recidive_apres.1_PEC_IC

plot(KM_golbal1,xlab="Months",xlim=c(0,200), ylab="Recurrence free survival")