survival/sma_plot_surv_asct: Adjust output
Change labels.
This commit is contained in:
parent
beedddda01
commit
b08320bd3b
@ -35,10 +35,11 @@ sma_plot_surv_dx_sex <- function() {
|
|||||||
# plot survival after transplantation
|
# plot survival after transplantation
|
||||||
sma_plot_surv_asct <- function() {
|
sma_plot_surv_asct <- function() {
|
||||||
ggsurvplot(survfit(surv_asct ~ 1), data = secmal, xscale = "d_y",
|
ggsurvplot(survfit(surv_asct ~ 1), data = secmal, xscale = "d_y",
|
||||||
title = "Survival after transplantation",
|
|
||||||
break.time.by = sma_break.time.by,
|
break.time.by = sma_break.time.by,
|
||||||
surv.median.line = "hv",
|
surv.median.line = "hv",
|
||||||
risk.table = "abs_pct",
|
risk.table = "abs_pct",
|
||||||
|
legend = "none",
|
||||||
|
xlab = "Years",
|
||||||
ggtheme = theme_bw())
|
ggtheme = theme_bw())
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user