如何使轴值与ggsurvplot中的风险表一致？

Question

我正在用ggsurvplot绘制KM曲线。可以通过break.time.by或break.x.by设置轴。但是，我想在x轴上指定特定的值。

我正在尝试How can I add specific value on x-axis in ggsurvplot/survminer in R?中提到的方法，但是风险表中的时间轴值与KM曲线的x轴却不是数学关系。

require("survival")
library(survival)
library(survminer)
fit <- survfit(Surv(time, status) ~ sex, data = lung)
gp<-ggsurvplot(fit, pval = TRUE, conf.int = TRUE, 
           break.x.by=400,
           break.time.by=400,
           risk.table = TRUE, risk.table.y.text.col = TRUE)
gp$plot<-gp$plot+scale_x_continuous(breaks = sort(c(300,700,900,1000)))
gp

我希望风险表中的时间点与Km曲线中的值一致（300,700,900,1000），但结果是（400,800）