生存曲線數字或字符值指定x軸刻度

Question

我繪製生存曲線ggsurvplot()，以改變我用作參數xscale="d_y"的年份中的天數。按照文檔建議，我也試過xscale=365.25。

的問題是，時間軸自動標記，但並不如我所料，在今年1，2，3 ...

相反，我得到0.55，1.1，依此類推。 我怎樣才能在每一年完全貼標籤？

查找下面

install.packages('survMisc') 
library("survminer") 
time <- sample(200:500, 20, replace=T) 
status <-sample(0:1, 20, replace=T) 
group<-c(rep("A", 10), rep("B", 10)) 
df<-data.frame (time, status, group) 
fit2 <- survfit(Surv(time, status) ~ group,data = df) 
ggsurvplot(fit2, xscale="d_y") 

Answer 1

你的數據time代碼不走超過134年。但增加break.x.by=365，你會讓他縮放你想要的。

install.packages('survMisc') 
library("survminer") 
time <- sample(200:500, 20, replace=T) 
status <-sample(0:1, 20, replace=T) 
group<-c(rep("A", 10), rep("B", 10)) 
df<-data.frame (time, status, group) 
fit2 <- survfit(Surv(time, status) ~ group,data = df) 
ggsurvplot(fit2, xscale="d_y", break.x.by=365)