R/theme_ebvm.R

In ebvm24/elisalib: Personal Packages, including color palattes and ggplot2 themes

#' Personal theme for ggplot2 plotting
#'
#' @description
#' Sets ggplot2 themes to minimal with larger titles and axis text
#'
#'@inheritParams ggplot2::theme_minimal
#'@inheritParams ggplot2::theme
#'@inheritParams ggplot2::theme_set
#'@family ggplot2
#'
#' @export
theme_ebvm <- function(base_size = 12, ...){
  my_theme <- ggplot2::theme_minimal(base_family = 'AvantGarde',
                                     base_size = base_size)
  my_theme$plot.title <- ggplot2::element_text(size=16,face='bold')
  my_theme$plot.subtitle <- ggplot2::element_text(size=14,face='bold')
  my_theme$axis.text <- ggplot2::element_text(face='bold')
  my_theme$axis.title = ggplot2::element_text(face='bold',size=12)
  return(my_theme)
}