From 7c37259bdc25e47e292e8fbcb9b4a4b744f1f491 Mon Sep 17 00:00:00 2001
From: dchakro <35454738+dchakro@users.noreply.github.com>
Date: Fri, 8 Oct 2021 11:52:20 +0300
Subject: [PATCH] Right justify y-axis markings

---
 DC_theme_generator.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/DC_theme_generator.R b/DC_theme_generator.R
index c51e195..5abd82f 100644
--- a/DC_theme_generator.R
+++ b/DC_theme_generator.R
@@ -65,7 +65,7 @@ DC_theme_generator <- function(type,
         axis.text.y = element_text(family = fontfamily,
                                    face = "plain",
                                    size = rel(fontsize.cex),
-                                   hjust = 0.5,
+                                   hjust = 1,
                                    angle = 0,
                                    color = "black",
                                    margin=unit(c(0.3,0.3,0.3,0.3), "cm")),
@@ -105,7 +105,7 @@ DC_theme_generator <- function(type,
         axis.text.y = element_text(family = fontfamily,
                                    face = "plain",
                                    size = rel(fontsize.cex),
-                                   hjust = 0.5,
+                                   hjust = 1,
                                    angle = 0,
                                    color="black",
                                    margin=unit(c(0.3,0.3,0.3,0.3), "cm")),