vapeplot: Vaporwave aesthetics for use in 'ggplot2'

#' Vaporwave palettes
#'
#' Color palettes from the Python package
#' \href{https://github.com/dantaki/vapeplot}{vapeplot} - a matplotlib
#' extension.
#'
#' Choose from several palettes:
#' \itemize{
#' \item vaporwave
#' \item cool
#' \item crystal_pepsi
#' \item mallsoft
#' \item jazzcup
#' \item sunset
#' \item macplus
#' \item seapunk
#' }
#'
#' @export
#' @examples
#' library(vapeplot)
#' vapeplot_palettes$seapunk
vapeplot_palettes <- list(
  vaporwave = c("#94D0FF","#8795E8","#966bff","#AD8CFF","#C774E8","#c774a9","#FF6AD5","#ff6a8b","#ff8b8b","#ffa58b","#ffde8b","#cdde8b","#8bde8b","#20de8b"),
  cool = c("#FF6AD5","#C774E8","#AD8CFF","#8795E8","#94D0FF"),
  crystal_pepsi = c("#FFCCFF","#F1DAFF","#E3E8FF","#CCFFFF"),
  mallsoft = c("#fbcff3","#f7c0bb","#acd0f4","#8690ff","#30bfdd","#7fd4c1"),
  jazzcup  = c("#392682","#7a3a9a","#3f86bc","#28ada8","#83dde0"),
  sunset  = c("#661246","#ae1357","#f9247e","#d7509f","#f9897b"),
  macplus = c("#1b4247","#09979b","#75d8d5","#ffc0cb","#fe7f9d","#65323e"),
  seapunk = c("#532e57","#a997ab","#7ec488","#569874","#296656")
)