R/taylorPals.R

In colouR: Create Colour Palettes from Images

#' list of Taylor swift colour palettes
#'
#' @export
taylor_palettes <- list(
  `tSwift`    = c("#539999","#80764E","#DDBF9A","#B29671","#1F7781","#E7E6D9","#21A7C7","#25351E","#4C5D38","#7EC0D1"),
  `fearless`  = c("#E4D0B3","#AA8044","#BBAA91","#99846A","#F4EADE","#DBBD87","#876032","#C3A063","#3C1E08","#694219"),
  `speakNow`  = c("#B77A9A","#A93F73","#B66C4F","#EEDBDB","#845787","#8A3A36","#3C1C2B","#D9A271","#D8B1B1","#623560"),
  `red`       = c("#694B4B","#C0B6A4","#4E3843","#7F675A","#AB5862","#95806D","#9B2E47","#A99783","#EDE6DA","#30263A"),
  `1989`      = c("#9E5E3A","#724936","#BE9D7D","#D9DACF","#3A3F51","#A1918F","#C3B6A2","#705F69","#AC7D5F","#8E7377"),
  `reputation`= c("#686868","#F1F1F1","#0A0A0A","#B7B7B7","#D4D4D4","#818181","#9C9C9C","#383838","#212121","#4F4F4F"),
  `lover`     = c("#B8A1B0","#BA628A","#A0847E","#366DA4","#553E43","#7B85A2","#78A8D5","#BABEDB","#EDC4D9","#805D5F"),
  `folklore`  = c("#B8A1B0","#BA628A","#A0847E","#366DA4","#553E43","#7B85A2","#78A8D5","#BABEDB","#EDC4D9","#805D5F"),
  `evermore`  = c("#A78F81","#2A120F","#D7B4A0","#B76F50","#62443D","#85685B","#F1D7C6","#57261A","#8D482E","#DE9573"),
  `midnights` = c("#BC806A","#834748","#E3E0DC","#683139","#442132","#B0B4BB","#AD948A","#6A829E","#1A1325","#9E655C")

)