From 93f6d8e66fd695c73116e44635176345eadfb292 Mon Sep 17 00:00:00 2001
From: dchakro <35454738+dchakro@users.noreply.github.com>
Date: Thu, 20 Oct 2022 11:35:21 +0300
Subject: [PATCH] configuration for major gridlines

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

diff --git a/DC_theme_generator.R b/DC_theme_generator.R
index 2253df4..fa3ef29 100644
--- a/DC_theme_generator.R
+++ b/DC_theme_generator.R
@@ -8,7 +8,9 @@ DC_theme_generator <- function(type,
                                fontfamily = "serif",
                                ax.fontstyle = "italic",
                                title.fontstyle = "bold.italic",
-                               title.fontsize.cex = 1.5){
+                               title.fontsize.cex = 1.5,
+                               x_gridline=NA,
+                               x_gridline=NA){
   
   # #<---------------------------->
   # # You must include this section when:
@@ -52,7 +54,8 @@ DC_theme_generator <- function(type,
                                     fill=NA,
                                     size=1),
         panel.background=element_blank(),
-        panel.grid.major=element_line(color=NA),
+        panel.grid.major.x=element_line(color=x_gridline),
+        panel.grid.major.y=element_line(color=y_gridline),
         axis.ticks = element_line(colour = "black"),
         text = element_text(family = fontfamily),
         plot.title = element_text(family = fontfamily,