R生存分析，绘制每个人死亡之前的事件持续时间

Question

是否可以将每个死亡事件之前的长度为X的水平指示器添加到经典生存曲线中？我的目标是可视化每个人死亡之前事件的持续时间。例如，患者在死亡之前接受治疗的持续时间或每个人在死亡之前经历不良健康的时间（请参见下图）。

我尝试过的事情： 我试图将水平线添加到"15L Full Bottle - 1015" "15L Empty Bottle - 15" 绘图对象中，但是，我无法直接访问绘图中点的y坐标以将线放置在死亡事件之前。 R生存包中是否有解决此问题的方法？下面，我粘贴了一个我要替换的变通方法：

ggsurvplot

我非常感谢您提出有关如何以更好的方式实施此建议的建议！谢谢！