我想在行尾添加每條生存曲線的標簽。我ggsurvplot從Survminer包中使用（基于ggplot2）。我不知道該怎么做ggrepel。我沒有找到任何有關生存資料的示例：
require("survival")
library(survminer)
library(ggrepel)
fit<- survfit(Surv(time, status) ~ sex, data = lung)
p=ggsurvplot(fit, data = lung)$plot;
p geom_label_repel()
上面的代碼會引發錯誤。
uj5u.com熱心網友回復：
p您創建的物件包含足夠的資訊來生成標簽。p$data是一個資料框，并包含一個名為的列strata，您可以在此處使用該列。您需要將label美學映射到此列。您還需要過濾資料副本以傳遞到geom_label_repel僅包含time每個層的最大值的層：
p geom_label_repel(aes(label = strata),
data = p$data %>%
group_by(strata) %>%
filter(time == max(time)))
轉載請註明出處，本文鏈接：https://www.uj5u.com/qianduan/493131.html