Add axis text and title size

This commit is contained in:
gnoblet 2022-12-21 11:35:28 -05:00
parent 4861a4c59d
commit 291e46ef73

View file

@ -46,6 +46,8 @@ theme_reach <- function(
legend_reverse = TRUE, legend_reverse = TRUE,
axis_x = TRUE, axis_x = TRUE,
axis_y = TRUE, axis_y = TRUE,
axis_text_size = 10,
axis_title_size = 11,
grid_x = FALSE, grid_x = FALSE,
grid_y = FALSE, grid_y = FALSE,
grid_color = cols_reach("main_lt_grey"), grid_color = cols_reach("main_lt_grey"),
@ -89,7 +91,10 @@ theme_reach <- function(
# Remove background for legend key # Remove background for legend key
legend.key = ggplot2::element_blank(), legend.key = ggplot2::element_blank(),
plot.title.position = "plot", plot.title.position = "plot",
plot.caption.position = "plot" plot.caption.position = "plot",
# Text sizes
axis.text = ggplot2::element_text(size = axis_text_size),
axis.title = ggplot2::element_text(size = axis_title_size)
) )
# Axis lines ? # Axis lines ?