R/ggplot_theme.r

In ArithmeticR/TOmisc:

#' ggplot red title theme
#'
#' @param build_on_theme : Another ggplot theme to build up.
#'
#' @return A ggplot theme.
#' @export
#'
#' @examples
#'
#' ggplot2::ggplot(data = mtcars, ggplot2::aes(x = disp, y = mpg)) +
#'  ggplot2::geom_point() +
#'   ggplot2::ggtitle("mtcars Data")+
#'   ggplot_red_title_theme()
#'
ggplot_red_title_theme <- function(build_on_theme = ggplot2::theme_bw){
  return(build_on_theme() + ggplot2::theme(plot.title = ggplot2::element_text(color = "darkred")))
}