R-更改GGSURVLOT中各条线的alpha值

这是我在堆栈溢出中的第一个问题，请耐心听我说。我正在尝试更改我的GGSURVLOT中单个行的alpha，但我不确定这是否可行。我发现了一些网站（如和），但这些代码似乎不适用于ggsurvplot

ggsurvplot(fit, data=ND,
           conf.int = FALSE,
           ggtheme = theme_classic(base_size = 13, base_line_size = 0.4, base_rect_size = 0.8),
           size = 2,
           palette=c("palevioletred1", "darkslategray1", "gold1", "palegreen3", "purple2","Dodgerblue1", "darkorange1","mediumseagreen"),
           alpha = c(0.2, 0.2, 0.2, 1, 0.2, 0.2, 0.2, 1),
           # censor= FALSE,
           censor.size=2,
           # censor.shape = c(124),

           legend="right", 
           legend.labs =c("I-PET1 neg", "I-PET2 neg", "I-PET3 neg", "I-PET4 neg", "I-PET1 pos", "I-PET2 pos", "I-PET3 pos", "I-PET4 pos"),
           legend.title = " ",
           xlab = "Time (months)",
           break.time.by = 12

)

有人知道怎么做吗？ 此外，x轴和y轴上的值是灰色的，我希望它们是黑色的。有什么建议吗

---

非常感谢

并非所有人都熟悉您正在处理的数据类型。例如，我们不知道“fit”中的内容，以及您为什么调用各种参数等。因此@teunbrand要求您提供更多信息，其他人可以提供更多帮助

GGSURVLOT内没有alpha选项。最简单的解决方案是使用ggplot2中的alpha函数将alpha添加到指定的颜色中。请参见下面的示例：

library("survminer")
library(gridExtra)
require("survival")
fit <- survfit(Surv(time, status) ~ sex, data = lung)

g1 = ggsurvplot(fit,
           conf.int = FALSE,
           palette=c("gold1", "palegreen3"),
           title="no alpha"
)
g2 = ggsurvplot(fit,
           conf.int = FALSE,
           palette=alpha(c("gold1", "palegreen3"),c(0.7,0.3)),
           title="alpha_0.7_0.3"
)
grid.arrange(g1$plot,g2$plot,ncol=2)

库（“survminer”）
图书馆（gridExtra）
要求（“生存”）
fit Hi，欢迎来到stack overflow！如果提问者提供一些最低限度的数据来说明问题，供回答者玩弄，通常会有所帮助。在R中共享此数据的一种简单方法是使用
dput（您的\u数据）
并将其附加到您的问题中。