Я хочу иметь графики для проверки гипотезы о пропорциональных рисках:
datasurv <- Surv(data2$TEMPS_PARTICIPATION_AGE, as.numeric(data2$DCD))
datacox <- coxph(datasurv2 ~ data2$med3plaque_ett1 + data2$TSFE_DDP + as.factor(data2$statut_tabac2) + data2$iecHI_tot)
summary(datacox)
datahyp <- cox.zph(datacox2, global = T)
datahyp
, а также кривые выживания для двух категорий моей переменной экспозиции: med3plaque_ett1
Спасибо много за вашу помощь