我正在尝试为两个不同的人群绘制三种不同癌症的生存图。我希望每种癌症类型都有一种颜色，人群之间的差异是线型（虚线与实线）。所以癌症 A 是红色的，PopA 有虚线，PopB 有实线，依此类推。
我似乎无法为每个癌症群体获得一种颜色，然后在人群之间改变线型。
我不能在这里发布所有数据，因为它是受保护的，但这里是 df、surv 函数和 ggsurvplot：
library(tidyverse)
library(survminer)
library(survival)
library(KMsurv)
library(ggfortify)
library(ggthemes)
> srv_time_mon <- sample(0:100,200, replace = TRUE)
> cancer <- sample(1:3,200, replace = TRUE)
> alive <- sample(0:1,200, replace = TRUE)
> pop <- sample(1:2,200, replace = TRUE)
> dead <- sample(0:1,200, replace = TRUE)
> df <- data.frame(srv_time_mon,cancer, alive, pop, dead)
> head(df)
srv_time_mon cancer alive pop dead
1 84 1 0 1 1
2 91 2 0 2 0
3 44 1 …