r - 使用 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.