inst/examples/survival.R

# 基础作图法绘制急性髓细胞白血病病人生存函数图
data("leukemia", package = "survival")
library(survival)
leukemia.surv = survfit(Surv(time, status) ~ x, data = aml)
plot(leukemia.surv, lty = 1:2, xlab = "time")
legend("topright", c("Maintenance", "No Maintenance"),
       lty = 1:2, bty = "n")

Try the MSG package in your browser

Any scripts or data that you put into this service are public.

MSG documentation built on July 22, 2021, 1:06 a.m.