library(survival)
library(survminer)
我正在使用 survminer 包来绘制未经调整的 Kaplan Meier 图。我正在计算比较不同暴露的死亡率，并且有一个非常具体的问题： 有没有办法更改 ggsurvplot 的 x 轴标签？就我而言，我想将时间点 0 替换为 30，将时间点 20 替换为 50，将时间点 40 替换为 70，将时间点 60 替换为 90。
我使用下面的代码创建 ggsurvplot：
fit31to90_Mortality <- survfit(msurv31to90DayMortality~Bacteria_Category, data =
Mortality_31to90_Days_Plot <-
ggsurvplot(fit31to90_Mortality, xlim = c(0,60),
break.x.by = 20, xlab = "Day", ylab = c("Survival probability"),
risk.table = "abs_pct", font.x = c(26, face = "bold"),
font.y = c(26, face = "bold"), font.tickslab = c(24),
font.legend = c(24), risk.table.fontsize = 7, risk.table.col = "black", size = 1)
Mortality_31to90_Days_Plot$plot