如何在R中使用ggplot2绘制指定样式的风险函数？
2026-7-21
绘制指定样式的风险函数图（优先用ggplot2）
需求背景与目标
我参考G. Broström所著《使用R进行事件史分析》学习，但书中相关概念的R示例代码极少。现在需要绘制风险函数图，要求效果与指定示例图、对应章节完全一致，优先使用ggplot2实现。
已完成的代码（生存/累积风险函数图）
我已经用ggplot2绘制出效果较好的生存函数与累积风险函数图，代码如下：
library(survminer) fit <- survfit(Surv(enter, exit, event) ~ male, data = df_final) ggsurvplot(fit, title = "Survival Function") + xlab("Age in years") + ylab("Survival")
数据格式示例
我的数据格式如下：
| id | male | enter | exit | event |
|---|---|---|---|---|
| 001 | 1 | 0.00 | 13.34 | 1 |
| 001 | 1 | 13.34 | 45.00 | 0 |
| 002 | 1 | 0.00 | 27.00 | 0 |
| 003 | 0 | 0.00 | 23.60 | 1 |
| 003 | 0 | 23.60 | 27.00 | 1 |
| 003 | 0 | 27.00 | 67.00 | 0 |
内容的提问来源于stack exchange，提问作者aerw4
相关产品推荐
相关产品推荐
