ggplot2中的图例标记和R中的ggfortify

Question

我绘制了一个图表，并希望自定义这个情节的传说。在这方面，我将感激所有的帮助。谢谢!

library("survival")
library("ggplot2")
library("ggfortify")

data(lung)
lung$SurvObj <- with(lung, Surv(time, status == 2))
km.by.sex <- survfit(SurvObj ~ sex, data = lung, conf.type = "log-log")

gender.plot <- autoplot(km.by.sex)
gender.plot <- gender.plot + 
  ggtitle("Gender based Survival (1=male, 2=female)") +
  labs(x = "Time", y = "Survival Probability") 
print(gender.plot)

Answer 1

在定制ggfortify图形时，我也遇到过类似的问题--我不太清楚这个问题在问什么，但我想假设您想从ggfortify的autoplot中自定义图例。要快速回答这个问题，可以使用典型的ggplot函数进行定制，因为它是一个ggplot对象。这应该是修改图例的方法，autoplot没有自己的库。更多信息见这个封闭性问题。

我稍微修改了您的问题，以包含可重复的代码，使用生存分析示例找到了这里。自定义情节的示例(重命名图例和颜色标签)：

gender.plot <- autoplot(km.by.sex)
gender.plot <- gender.plot + 
  ggtitle("Gender based Survival") +
  labs(x = "Time", y = "Survival Probability") +
  guides(fill=FALSE) +
  labs(colour = "Gender") +
  scale_color_manual(labels = c("Male", "Female"), values = c(1, 2))
print(gender.plot)

​

​