服务热线
178 0020 3020
library('survival')
library(survminer)
fit<-survfit(Surv(time,status)~sex,data=lung)
ggsurvplot(fit,data=lung,color="sex",palette=c("red","blue"),pval=TRUE,surv.median.line="hv",conf.int=TRUE,legend.title="SEX",legend.labs=c("Male","Female"),risk.table=TRUE,risk.table.col="sex",ncensor.plot=TRUE)+ggtitle("R2-35")
做植物的,不太懂生存曲线的意义,查了半天还是没搞懂,参考了同学的,只能把最基本的搞出来了,感觉太高深了,需要好好学习
附件