Proyecto final: El modelo de Cox
Para cerrar el curso, volvamos al conjunto de datos sobre cáncer de pulmón que usamos brevemente en estos dos últimos capítulos. En resumen, este conjunto contiene información sobre la supervivencia de pacientes con cáncer de pulmón avanzado del North Central Cancer Treatment Group. El evento se guarda en la variable status, que toma el valor 2 si la persona no sobrevivió. La puntuación de rendimiento (variable performance) mide hasta qué punto un paciente puede realizar sus actividades diarias habituales (malo=0, bueno=100), evaluada por un médico. Queremos conocer la asociación entre puntuaciones de rendimiento específicas y el tiempo de supervivencia.
Este ejercicio forma parte del curso
Análisis de supervivencia en R
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
# Compute Cox model and survival curves
cxmod <- ___(___(___, ___) ~ ___, data = lung)
new_lung <- data.frame(performance = ___)
cxsf <- ___(cxmod, data = ___, newdata = ___, conf.type = "none")