From 27942f784a966d55e13e9b2690d40d99d20b1211 Mon Sep 17 00:00:00 2001
From: Jens Sauer <jsauer65@gmail.com>
Date: Tue, 17 Nov 2020 19:45:18 +0100
Subject: [PATCH] secmal: Fix median survival line warning

Median survival lines are not allowed with "cumhaz" function in
ggsurvplot().
---
 secmal.R | 1 -
 1 file changed, 1 deletion(-)

diff --git a/secmal.R b/secmal.R
index 157787e..69ecc22 100644
--- a/secmal.R
+++ b/secmal.R
@@ -47,7 +47,6 @@ sma_plot_secmal_haz_sex <- function() {
 	ggsurvplot(survfit(surv_sec ~ sex, data = secmal), data = secmal, xscale = "d_y",
 		   title = "Secondary malignacies",
 		   fun = "cumhaz",
-		   surv.median.line = "hv",
 		   break.time.by = sma_break.time.by,
 		   risk.table = "abs_pct",
 		   pval = TRUE,