Jämförelse av Weibull-modellen och Kaplan-Meier-skattningen
Nu ska vi plotta överlevnadskurvan från Weibull-modellen för GBSG2-data!
Paketen survival och survminer samt GBSG2-data är redan inlästa i den här övningen.
Den här övningen är en del av kursen
Överlevnadsanalys i R
Övningsinstruktioner
- Beräkna Weibull-modellen för
GBSG2-data. - Beräkna överlevnadskurvan utifrån modellen.
- Plotta överlevnadskurvorna från de två skattningarna.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# Weibull model
wb <- ___(___(___, ___) ~ ___, ___)
# Retrieve survival curve from model
surv <- seq(.99, .01, by = -.01)
# Get time for each probability
t <- predict(___, type = ___, p = ___, newdata = data.frame(___))
# Create data frame with the information needed for ggsurvplot_df
surv_wb <- data.frame(time = ___, surv = ___,
upper = NA, lower = NA, std.err = NA)
# Plot
ggsurvplot_df(fit = ___, surv.geom = ___)