R/themes.R

Defines functions theme_cnv_plot theme_motif_plot theme_length_plot

theme_length_plot <- function(){

  theme_classic() %+replace%
    theme(
      axis.text = element_text(size = 10),
      axis.text.x = element_text(angle = 45, hjust = 0.5, vjust = 0.5, size = 8),
      axis.title = element_text(size = 14, face = "bold"),
      legend.position = "none"
    )
}

theme_motif_plot <- function(){

  theme_classic() %+replace%
    theme(
      axis.text = element_text(size = 10),
      axis.text.x = element_text(angle = 45, hjust = 0.5, vjust = 0.5, size = 8),
      axis.title = element_text(size = 14, face = "bold"),
      legend.position = "none"
    )
}


theme_cnv_plot <- function(){
  theme_classic() %+replace%
    theme(axis.ticks.x = element_blank(),
        axis.line.x = element_blank(),
      axis.text.x = element_text(size = 8),
        axis.title = element_text(size = 14, face = "bold"))
}
hw538/cfDNAPro documentation built on Aug. 13, 2024, 2:58 p.m.