随性、随时、随心
点点滴滴的生活记录
在寻找诗和远方的路上
一手机、一相机、一电脑、一本书、一个人、一世界、一生
@ since 2012
Attitude Determines Altitude!
> library(survminer)
> fit <- survfit(Surv(futime, fustatus)~scores_by2,data = dtrain_score)
> p <- ggsurvplot(fit, conf.int=F, pval=T, risk.table=T, legend.labs = c('High-Risk','Low-Risk'),
legend.title='Risk Score', palette = c("dodgerblue2","orchid2"),
risk.table.height = 0.3)
> p