From 5e6ceefe2239c1b8b2ef5bf70467395cdd94d4f7 Mon Sep 17 00:00:00 2001
From: gnoblet <gnoblet@zaclys.net>
Date: Wed, 21 Dec 2022 11:32:30 -0500
Subject: [PATCH] Align title and caption to plot

---
 R/theme_reach.R | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/R/theme_reach.R b/R/theme_reach.R
index 254f5e9..4dea754 100644
--- a/R/theme_reach.R
+++ b/R/theme_reach.R
@@ -87,7 +87,9 @@ theme_reach <- function(
     panel.grid.minor.x = ggplot2::element_blank(),
     panel.grid.minor.y = ggplot2::element_blank(),
     # Remove background for legend key
-    legend.key = ggplot2::element_blank()
+    legend.key = ggplot2::element_blank(),
+    plot.title.position = "plot",
+    plot.caption.position =  "plot"
   )
 
   # Axis lines ?