statable Statistiques pour les études et la recherche

Modèle AFT : de quel facteur change le temps jusqu’à l’événement ? (rapport de temps)

En bref

Le modèle AFT (accelerated failure time, temps de défaillance accéléré) indique de quel facteur change le temps jusqu’à l’événement : « deux fois plus long » au lieu de « moitié moins de risque ». Il se trouve dans la carte « Combien de temps faut-il avant un événement ? » sous « Plus d’options », à côté de la régression de Cox, avec les mêmes colonnes. Le rapport de temps est exp(b) avec un intervalle de Wald ; la sortie montre aussi l’échelle σ, la log-vraisemblance et l’AIC des quatre distributions (Weibull, exponentielle, log-normale, log-logistique). Par défaut, c’est Weibull.

Piège 1 : le signe

Un b positif dans le modèle AFT signifie un temps plus long (rapport de temps supérieur à 1), dans la régression de Cox un risque plus élevé (hazard ratio supérieur à 1). Dans l’exemple lung (227 observations complètes, 164 événements), les femmes ont b = +0,401 dans le modèle AFT et un rapport de temps de 1,49 (intervalle à 95 % [1,17 ; 1,90], p = ,001) : la durée de survie est environ 1,5 fois plus longue. Dans la régression de Cox, les mêmes femmes ont b = −0,553 et un hazard ratio de 0,575. Même énoncé, signe opposé.

Autres pièges

Weibull et hazard ratio

Seul le modèle de Weibull est aussi un modèle à risques proportionnels. On y a HR = exp(−b/σ) ; Statable le montre dans un tableau. Pour lung : âge 1,010, femme 0,578, ECOG 1,591 (Cox : 1,011, 0,575, 1,590). L’intervalle du hazard ratio traite σ comme fixe et n’est donc qu’une approximation. Le modèle exponentiel est le modèle de Weibull avec σ = 1.

Rapporter le résultat

Modèle AFT (Weibull) : TR = 1,49, IC à 95 % [1,17 ; 1,90], p = ,001 (sexe) ; σ = 0,73 ; AIC = 2274,9 ; 227 personnes, 164 événements

Pour les spécialistes

survival::survreg avec dist = "weibull", "exponential", "lognormal" ou "loglogistic" ; rapport de temps exp(b), intervalle de Wald avec qnorm(.975) ; AIC = −2·logLik + 2·(nombre de coefficients + échelle).

library(survival)
m <- survreg(Surv(time, status == 2) ~ age + sex + ph.ecog, data = lung, dist = "weibull")
summary(m)   # exp(Koeffizient) = Zeitverhältnis
AIC(m)

Voir aussi

Ouvrir dans Statable