configuration for major gridlines

This commit is contained in:
dchakro 2022-10-20 11:35:21 +03:00
parent 0f9d36dfeb
commit 93f6d8e66f

View file

@ -8,7 +8,9 @@ DC_theme_generator <- function(type,
fontfamily = "serif", fontfamily = "serif",
ax.fontstyle = "italic", ax.fontstyle = "italic",
title.fontstyle = "bold.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: # # You must include this section when:
@ -52,7 +54,8 @@ DC_theme_generator <- function(type,
fill=NA, fill=NA,
size=1), size=1),
panel.background=element_blank(), 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"), axis.ticks = element_line(colour = "black"),
text = element_text(family = fontfamily), text = element_text(family = fontfamily),
plot.title = element_text(family = fontfamily, plot.title = element_text(family = fontfamily,