Update cohort-diagnostics-timeDistributions.R (#336)

adding fix for issue 168
OHDSI · Sep 13, 2024 · 04d011a · 04d011a
1 parent eea1f31
commit 04d011a
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/cohort-diagnostics-timeDistributions.R b/R/cohort-diagnostics-timeDistributions.R
@@ -176,7 +176,10 @@ plotTimeDistribution <- function(data, shortNameRef = NULL, showMax = FALSE) {
                          zerolinewidth = 2,
                          gridcolor = 'ffff'),
                        yaxis = list(
-                         title = db,
+                         title = addTextBreaks(
+                           text = db, 
+                           length = 25 # change this based on plot height?
+                         ),
                          showTitle = FALSE,
                          zerolinecolor = '#ffff',
                          zerolinewidth = 2,