Compararea modelului Weibull cu estimatorul Kaplan-Meier
Să reprezentăm grafic curba de supraviețuire obținută din modelul Weibull pentru datele GBSG2!
Pachetele survival și survminer, precum și datele GBSG2, sunt deja încărcate în acest exercițiu.
Acest exercițiu face parte din cursul
Analiza de supraviețuire în R
Instrucțiuni pentru exercițiu
- Calculează modelul Weibull pentru datele
GBSG2. - Calculează curba de supraviețuire din model.
- Reprezintă grafic curbele de supraviețuire obținute din cele două estimări.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# 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 = ___)