math335_functions.R

math335_theme <- function() {
theme_bw() + theme(panel.border = element_blank(),
                   panel.grid.major = element_blank(),
                   panel.grid.minor = element_blank(),
                   axis.line = element_line(colour = "black"),
                   plot.title = element_text(face="bold"),
                   axis.title = element_text(face="bold"),
                   plot.caption = element_text(face="italic", size = 8, color = "#4d4d4d"))
}