删除ggsurvplot R中的百分号。

Question

我有以下代码，在这里我用百分比而不是比例来建立一条生存曲线。我还将存活时间用十进制来表示。我想把百分比符号从下面的图中删除，因为我想把它添加到图的ylab标题中。

library(survival)
library(survminer)
data(lung)
fit <- survfit(Surv(time, status) ~sex, data = lung)
ggsurvplot(fit, risk.table = TRUE, axes.offset = FALSE,
           break.y = 0.10,
           surv.scale = c("percent"),
           xlim = c(0, 1050))

Answer 1

其中一种方法是在制作该图，然后在图中添加一个 "百分比 "符号。scale_y_continuous 调用，将y轴替换为任何你想要的东西。

plot <- ggsurvplot(fit, risk.table = TRUE, axes.offset = FALSE,
           xlim = c(0, 1050),
           ylab = "Survival Probability (%)")
plot$plot <- plot$plot + 
  scale_y_continuous(breaks = seq(0,1,by=0.1), labels = seq(0,100,by=10))
plot

为什么软件包维护者不让你直接用 +?