f2 <- cph(Surv(time,status) ~ x1+x2+x3, x=T, y=T, surv=T, data = af)
cal1 <- calibrate(f2,cmethod="KM",u=365,method="boot",m=115,B=1000,legend=FALSE)
plot(cal1,lwd=2,lty=1,xlab=" Predicted Probability 1-Year BFS ",ylab=list("Actual 1-Year BFS "),xlim=c(0,1),ylim=c(0,1))
一张图
cal1 <- calibrate(f2,cmethod="KM",u=3650,method="boot",m=115,B=1000,legend=FALSE)
plot(cal1,lwd=2,lty=1,xlab=" Predicted Probability 10-Year BFS ",ylab=list("Actual 10-Year BFS "),xlim=c(0,1),ylim=c(0,1))
这两张图的Predicted Probability怎么都在一个地方?没有变位置,不知道我的代码有没有问题,求教。