R/themes.R

In amyh25/RFunctions: Some R Functions

#' my_theme
#' @return my_theme with modifications of my preferences
#' @export

my_theme <- function(...) {
  theme_classic(
    strip.background = element_blank(), 
    panel.background = element_blank(), 
    plot.background = element_blank(), 
    ...
  )
}

#' theme_presentation
#' 
#' @return my_theme with size modifications for presentations
#' 
#' @export

theme_presentation <- function() {
  my_theme(
    
  )
}

#' theme_poster
#' 
#' @return my_theme with size modifications for poster
#' 
#' @export

theme_poster <- function() {
  my_theme(
    size = 24
  )
}

#' theme_figure
#' 
#' @return my_theme with size modifications for figures
#' 
#' @export

theme_figure <- function() {
  my_theme(
    
  )
}