使用R语言为生存曲线添加自定义标题

使用R语言为生存曲线添加自定义标题

在生存分析中，生存曲线是一种常用的可视化工具，用于显示随时间变化的事件发生率。在R语言中，我们可以使用survival包和ggplot2包来创建生存曲线图。本文将介绍如何在生存曲线图中添加自定义标题。

首先，我们需要安装并加载必要的R包。运行以下代码来安装和加载所需的包：

install.packages("survival")
install.packages("ggplot2")

library(survival)
library(ggplot2)

接下来，我们将使用survival包中的一个示例数据集来演示如何创建生存曲线。我们将使用lung数据集，该数据集包含了肺癌患者的生存时间和一些相关变量。运行以下代码来加载数据集：

data(lung)

现在，我们可以开始创建生存曲线图。我们将使用survfit()函数计算生存曲线的估计值，并使用ggplot2包绘制图形。下面是完整的代码：

# 计算生存曲线估计值
fit <- survfit(Surv(time, status) ~ 1, data = lung)

# 绘制生存曲线图
p <- ggsurvplot(fit, data = lung, surv.median.line = "hv", censor = FALSE)

# 添加自定义标题
p <- p + ggtitle("肺癌患者生存曲线")

# 显