Atividade 3

Para os dados de “Sobrevida para o câncer de mama na grande Cuiabá, Brasil: estudo de base populacional”, utilize o modelo de Cox para analisar as variáveis citadas abaixo.

-> Os dados encontram-se no arquivo “dadosmama”

RESOLUÇÃO

## Carregando pacotes exigidos: survival
## Carregando pacotes exigidos: survfit
## Carregando pacotes exigidos: readxl

As variáveis no estudo são:

Raça/cor: Não branco = 0 Branco = 1 Idade: <= 50 anos = 0 > 50 anos = 1

Agora, vamos carregar nossos dados

Na figura acima temos o Log(Λb0j(t)) versus tempo para as covariáveis: Idade e raça.

Agora, vamos ajustar ao modelo de cox

## The following objects are masked _by_ .GlobalEnv:
## 
##     cens, idade, raca, tempos
## Call:
## coxph(formula = Surv(tempos, cens) ~ idade + raca, data = dados, 
##     x = T, method = "breslow")
## 
##   n= 58, number of events= 58 
## 
##          coef exp(coef) se(coef)      z Pr(>|z|)   
## idade -0.8713    0.4184   0.3255 -2.677  0.00744 **
## raca   0.4455    1.5612   0.2840  1.569  0.11671   
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
##       exp(coef) exp(-coef) lower .95 upper .95
## idade    0.4184     2.3899    0.2211    0.7919
## raca     1.5612     0.6405    0.8949    2.7238
## 
## Concordance= 0.658  (se = 0.041 )
## Likelihood ratio test= 10.23  on 2 df,   p=0.006
## Wald test            = 10.95  on 2 df,   p=0.004
## Score (logrank) test = 11.63  on 2 df,   p=0.003
## [1] -188.1357 -183.0217

Portanto, segue algumas interpretações:

1 - O risco de pacientes com idade igual ou inferior a 50 anos de desistirem do tratamento é 58,2% menor que os pacientes com idade inferior a 30 anos.

2 - O risco de pacientes com raça branca de desistirem do tratamento é 56,1% maior se comparado aos pacientes de raça não branca.