Weibull 모델 결과 시각화

R로 배우는 생존 분석

Heidi Seibold

Statistician at LMU Munich

Weibull 모델 시각화

시각화 도구는 주로 계단 함수에 초점을 맞춥니다.

따라서 다음 코드는 작동하지 않습니다:

wb <- survreg(Surv(time, cens) ~ 1)
ggsurvplot(wb)

Weibull 모델 시각화

wb <- survreg(Surv(time, cens) ~ 1)

생존 곡선:

surv <- seq(.99, .01, by = -.01)
t <- predict(wb, type = "quantile", p = 1 - surv, newdata = data.frame(1))

surv_wb <- data.frame(time = t, surv = surv, 
                      upper = NA, lower = NA, std.err = NA)

플롯:

ggsurvplot_df(fit = surv_wb, surv.geom = geom_line)

연습해 봅시다!

R로 배우는 생존 분석