How to edit legend in ggfortify in R

Question

I am using carData::Rossi data to estimate a survival curve. This is the code I used to generate the plot:

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

library(ggplot2); library(ggfortify)
autoplot(km1) + 
  labs(x="Time", y="Proportion", strata= "Raza") 

I got this result:

How can I change the strata label to Race?

Answer 1

Instead of strata = "Raza", you using both color = "Raza" and fill = "Raza" will works.

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") 

I'm not sure that colour = "Raza" works. It did't work for me.

By using 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")