To give a basic summary, I'm trying to compare a cox-ph model, and a joint mode. My data has these patients which have survived up to time 25. For some reason however, my survival curve will start to decrease at time 10, and I'm so confused as to why. I'm certain it has something to do with my excel. This is the patient I'm using:
Patient Time death Y obstime risk gender start stop event age slope
15 25 0 130 20 high 1 20 25 0 40 -0.2
This is the code:
ND2<-cholnew.id[cholnew.id$patient=="15",]
coxFitXARS.chol<-coxph(Surv(Time,death)~ sex+age+risk+slope,data=chol.id,x=TRUE)
plot(survfit(coxFitXARS.chol,newdata=ND2,last.time="obstime"),mark.time=FALSE,col="red",xlab = "Time", ylab="Survival Probability",main="Patient 15 (using basic cox)")
Any ideas why this may the case would be greatly appreciated.