Comparing Weibull model and Kaplan-Meier estimate
Let's plot the survival curve we get from the Weibull model for the GBSG2 data!
The survival and survminer packages and the GBSG2 data are loaded for you in this exercise.
Cet exercice fait partie du cours
Survival Analysis in R
Instructions
- Compute the Weibull model for the
GBSG2data. - Compute the survival curve from the model.
- Plot the survival curves you get from the two estimates.
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
# 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 = ___)