R/theme_avf.R

In andrewvanleuven/rleuven: A Collection of R Functions for Personal Use

theme_avf <- function(f) {
  theme_minimal(base_family = f) +
    theme(panel.grid.minor = element_blank(),
          plot.background = element_rect(fill = "white", color = NA),
          plot.title = element_text(face = "bold",hjust = .5),
          axis.title = element_text(face = "bold"),
          strip.text = element_text(face = "bold"),
          strip.background = element_rect(fill = "grey80", color = NA),
          legend.title = element_text(face = "bold",hjust = .5))
}