การแสดงผลโมเดล Weibull

Survival Analysis in R

Heidi Seibold

Statistician at LMU Munich

การแสดงผลโมเดล Weibull

เครื่องมือแสดงผลส่วนใหญ่รองรับเฉพาะฟังก์ชันแบบ step function

ดังนั้นโค้ดต่อไปนี้จึงใช้ไม่ได้:

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)

มาฝึกกันเถอะ!

Survival Analysis in R