首页 > 解决方案 > R:ggsurvplot 如何在 start.time(2 年)之前删除平线

问题描述

ggsurvplot 的链接

我已经定义了 start.time = 2 和 xlim = c(2,10)。但我不明白为什么2年前有一条平线。实际上没有 event_years < 2。任何人都可以帮忙吗?

谢谢!

event_censor <- c(rep(0,15), 1,0,1,1,0)  
event_years  <- c(10,10,2.37,10,5.87,10,10,10,5.80,
                  10,10,10,10,6.67,5.71,2.01,2.30,3.19,8.75,2.61)
test.df<-as.data.frame(cbind(event_censor,event_years))

ggsurvplot(survfit(Surv(event_years, event_censor) ~ 1, 
                   data = test.df, start.time=2 ), 
           data = test.df,  fun = "event", xlim = c(2,10), break.x.by = 1)

标签: rggplot2

解决方案


这是编辑后的代码

library(survminer);library(survival)
ggsurvplot(survfit(Surv(event_years, event_censor) ~ 1, 
                       data = test.df, start.time=2 ), 
                      data = test.df,  fun = "event", xlim = c(2,10), break.x.by = 1,axes.offset=F)

我刚加了axes.offset=F。您可能会使用以下方法找到更多详细信息??ggsurvplot


推荐阅读