我想使用 survial 和 survminer 包从 R 中的生存分析中绘制数据。我的生存概率从 0% 到 5% 不等。我想要一个将 ylim 设置为 0 到 20 但在轴上也应该有 100% 的图表。看起来像这样:
我正在这样做:
tlr_plot <- ggsurvplot(survFit_TLR, fun = "event", conf.int = FALSE, risk.table = 'nrisk_cumevents', title="TLR", legend = "none", tables.theme = theme_cleantable(),surv.scale="percent")
tlr_plot$plot <- tlr_plot$plot +
scale_x_discrete(breaks = c(0,180,365,540,730), labels = c(0,180,365,540,730), limits=0:741)
tlr_plot