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.
Este ejercicio forma parte del curso
Survival Analysis in R
Instrucciones del ejercicio
- Compute the Weibull model for the
GBSG2data. - Compute the survival curve from the model.
- Plot the survival curves you get from the two estimates.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
# 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 = ___)