Compararea modelelor Weibull și Log-Normal I
În acest exercițiu, vrem să adăugăm probabilitățile de supraviețuire corecte într-un data frame. Acesta va fi folosit pentru a reprezenta grafic curbele de supraviețuire. surv_wide este un data frame în format wide care conține informații despre terapia hormonală și curbele de supraviețuire pentru modelele Weibull și log-normal.
Pachetele survival, survminer și reshape2, precum și datele GBSG2, sunt deja încărcate pentru tine în acest exercițiu.
Acest exercițiu face parte din cursul
Analiza de supraviețuire în R
Instrucțiuni pentru exercițiu
- Transformă data frame-ul în format lung (long format).
- Folosește
surv_long$surv_idpentru a adăuga probabilitățile de supraviețuire corectesurvîn data frame.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# Melt the data.frame into long format.
surv_long <- melt(surv_wide, ___ = c("horTh", "dist"), ___ = "surv_id", ___ = "time")
# Add column for the survival probabilities
surv_long$surv <- surv[as.numeric(surv_long$___)]
# Add columns upper, lower, std.err, and strata contianing NA values
surv_long[, c("upper", "lower", "std.err", "strata")] <- NA