r - cmprsk 包中的微分线，用于竞争风险生存曲线

Question

我对 R 比较陌生，我使用 cmprsk 包中的 crr() 代码执行了竞争风险分析。我似乎无法使累积发生率图中的不同线条具有不同的线条类型或颜色。我对接受或未接受放射治疗 (RTX) 治疗的患者的累积发病率差异感兴趣。我已经为 lty= 或 color= 尝试了许多不同的选项，但它只使用输入的第一个线型或颜色。

谁能澄清我做错了什么？非常感谢！

这是我的代码：

data <- read_sav("Y:...\data.sav")
covRTX<-model.matrix(~RTX, data=data)[,-1]

zRTX<-crr(ftime = data$FUPTIME, fstatus=data$CR, failcode = 1, cencode = 0, cov1 = covRTX)

dssall<-predict(zRTX,covRTX)

plot.predict.crr(dssall, lty=1:3, ylim = c(0,0.5), xmin=0, xmax = 60) 

cum inc 曲线的图像

标签： rplotsurvival