如何在 R 中的 ggfortify 中編輯圖例

Question

我正在使用 Rossi 數據來估計生存曲線。 這是我用來生成繪圖的代碼：

km1 <- survfit(Surv(week,arrest) ~ race,type = "kaplan-meier",data=Rossi)

autoplot(km1) + 
  labs(x="Time", y="Proportion", strata= "Raza") 

我得到了這個結果：

如何將層標簽更改為 Race？

Answer 1

您可以使用color = "Raza"和fill = "Raza"代替strata = "Raza" 。

library(GlobalDeviance)
library(ggfortify)

km1 <- survfit(Surv(week,arrest) ~ race,type = "kaplan-meier",data=Rossi)

autoplot(km1) + 
  labs(x="Time", y="Proportion", color = "Raza", fill = "Raza") 

我不確定colour = "Raza"有效。 它對我不起作用。

通過使用survminer::ggsurvplot ，

survminer::ggsurvplot(km1, xlab = "Time", ylab = "Proportion", 
                      legend.title = "Raza", conf.int = TRUE, ylim = c(0.65,1),
                      legend = "right", surv.scale = "percent")