From ac822f48fafbc3cd726580864200b53b44f7ffae Mon Sep 17 00:00:00 2001
From: Jens Sauer <jsauer65@gmail.com>
Date: Sun, 17 Jan 2021 19:04:01 +0100
Subject: [PATCH] secmal/cmprsk: Fix typo

---
 secmal.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/secmal.R b/secmal.R
index 08f20a9..0b82288 100644
--- a/secmal.R
+++ b/secmal.R
@@ -80,7 +80,7 @@ sma_plot_secmal_cmprsk <- function() {
 	cpr <- cuminc(secmal$time_at_risk / 365.25, secmal$time_at_risk_status)
 	ggcompetingrisks(cpr[1], conf.int = TRUE, multiple_panels = FALSE,
 			legend = "none", title = "", ylim = c(0:1),
-			xlab = "Year")
+			xlab = "Years")
 }
 
 # Calculate cumuative risk with ci from cuminc.