在 R 中的 ggplot2 和 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。要快速回答这个问题 -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)