R/doubledeepms__gg_color_hue.R

In lehner-lab/doubledeepms: Analysis scripts to reproduce the figures and results from doubleDeepPCA manuscript

#' doubledeepms__gg_color_hue
#'
#' ggplot2-like colour scale in HCL space.
#'
#' @param n an integer number of colours required (required)
#'
#' @return a vector of colours
#' @export
doubledeepms__gg_color_hue <- function(
  n
  ){
  hues = seq(15, 375, length = n + 1)
  hcl(h = hues, l = 65, c = 100)[1:n]
}