Vamos a decir que tengo un "riñón catéter' conjunto de datos. Datos acerca de la recurrencia de veces a la infección, en el punto de inserción del catéter, para los pacientes renales mediante portátiles equipos de diálisis. Los catéteres pueden ser removidos por causas distintas a la infección, en cuyo caso, la observación es censurado. Cada paciente tiene exactamente 2 observaciones.
Si quiero ajuste de Cox PH con el modelo de efectos aleatorios (aquí Gamma fragilidad) utilizando el algoritmo EM. Utilizando el construido en la supervivencia paquete de código R coxph()
, que puedo hacer fácilmente como este
library(survival) data(kidney) fit<-coxph(Surv(time, status) ~ age + sex + frailty(id, dist='gamma', method='em'), kidney)
Pero si quiero escribir un paso a paso de la función para el algoritmo EM, ¿cómo debo proceder?