R/theme_liu.R

In Sidryd/lab4sidjac: Linear regression

#' Adds a LiU Theme to a ggplot object.
#' @description \code{theme_liu} adds the LiU theme, changing title and axis titles.
#' @return Return a theme with LiU color #00b9e7 for title and #17c7d2 for axis title.
#' @examples
#' ggplot2::ggplot() + theme_liu()
#' @references https://insidan.liu.se/kommunikationsstod/grafiskprofil?l=en
#' @export

theme_liu <- function() {
  ggplot2::theme_bw() +
  ggplot2::theme(
    #text = ggplot2::element_text(family = "Georgia"),
    plot.title = ggplot2::element_text(color = "#00b9e7", size = 16),
    axis.title = ggplot2::element_text(colour = "#17c7d2")
  )
}