在使用lines（）后如何添加图例

Question

首先我制作一个CIF情节：

cmprsk:::plot.cuminc(forplot,ylim=c(0, 0.04),curvlab="CIF",main="Curves for Failure Hematologic P=(0:1) ")

然后我添加1公里的曲线

fitcs1=survfit(Surv(hem_free, hem_censor2)~1)
lines(fitcs1,fun='event',lty=2:3,lwd=0.5,mark.time=FALSE,legend="e")  #"event" plots cumulative events (f(y) = 1-y)

我想知道为什么1-KM曲线没有传说

我尝试使用legend("topleft",c("1-KM curve"),lty=2:3,lwd=0.5)，但我无法删除第一张图中的标签。

如果你可以帮助我的话，我会非常合适！

Answer 1

没错。您无法从使用基本图形制作的绘图中删除项目。如果您使用lines成功，那么plot.cuminc正在使用基本图形的绝佳证据。基本图形与ggplot2图形不同。没有“意识”或“面向对象”，当添加额外的行时，可以很容易地插入新组件。您可能需要使用curvlab=NA来抑制第一个图例，然后使用添加的注释从头开始构建图例。发布一个工作代码示例，可能使用cmprsk中的一个数据集或示例。