R CIF生存曲线图

我正在使用cmprsk绘制CIF生存曲线：

cc<-cuminc(fu_m, event, diabetes, rho=0, cencode=0,
    na.action=na.omit)
plot(cc,lty=1:6,color=1, xlab="Months", ylab="Cumulative Incidence")

事件0：受谴责的观察结果， 1：事件， 2:比赛项目

糖尿病0：没有糖尿病， 1：存在糖尿病

我怎样才能修好它？

---

谢谢大家

您可以使用

[

将

cuminc

对象子集，如图所示（cc[1:2]）。这应该只绘制事件曲线，但你应该玩一玩哦，迈克，这很好！！！非常感谢！！我能问你一些关于Schoenfeld残差图的问题吗？再次感谢！当然，你打算发布另一个问题或编辑这个问题吗？有什么更好的办法吗？我不知道。。

> str(event)
Factor w/ 3 levels "0","1","2": 1 3 2 1 2 1 1 2 1 1 ...
> str(diabetes)
Factor w/ 2 levels "0","1": 1 1 1 1 1 1 1 1 1 1 ...