我使用包生存的函数 survSplit 了解了 R 中 Cox 回归中的时间相关协变量。我将其用作不遵循 Cox 比例假设的协变量的交互项,该假设工作正常。
现在的问题是,我想对新的数据点进行预测,但我怎么能做到这一点,因为我不知道它们能存活多久?我如何知道在我的计算中使用哪个时间值?如果有帮助,我希望计算一年生存的概率。此外,由于某些患者将在数据集中重复,我如何计算校准/区分?
代码:
rm(list = ls(all=T))
library("rms")
library("pec")
data(veteran)
vet2 <- survSplit(Surv(time, status) ~ ., data= veteran, cut=c(90, 180),
episode= "tgroup", id="id")
ddist <- datadist(vet2); options(datadist='ddist')
vfit2 <- cph(Surv(tstart, time, status) ~ trt + prior + karno*strat(tgroup), data=vet2,surv = T,X=T,Y=T)
predictSurvProb(vfit2,newdata=vet2[vet2$id==2,],times = c(121,190))