Porównanie modelu Weibulla i log-normalnego I
W tym ćwiczeniu dodasz prawidłowe prawdopodobieństwa przeżycia do ramki danych. Posłuży ona do narysowania krzywych przeżycia. surv_wide to ramka danych w formacie szerokim, zawierająca informacje o terapii hormonalnej oraz krzywe przeżycia dla modelu Weibulla i modelu log-normalnego.
Pakiety survival, survminer i reshape2 oraz dane GBSG2 są już wczytane.
To ćwiczenie jest częścią kursu
Analiza przeżycia w R
Instrukcje do ćwiczenia
- Przekształć ramkę danych do formatu długiego.
- Użyj
surv_long$surv_id, aby dodać do ramki danych właściwe prawdopodobieństwa przeżyciasurv.
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
# 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