x軸スケールを指定したサバイバルカーブの数値または文字値

Question

私はggsurvplot()で生存曲線をプロットし、引数xscale="d_y"として使用する年数を変換します。私はxscale=365.25もドキュメントの示唆に従って試しました。

問題が

は、代わりに私が0.55、1.1、などを取得...その時間軸が自動的にラベルされたが、私は今年1、2、3で期待できないとされています。 1年ごとに正確にラベルを付けるにはどうすればよいですか？

以上1.34年行かないtime

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

あなたのデータ以下のコードを検索します。しかし、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)