# get list of color codes for any number of category scales::hue_pal(5) # 1 category colors1 <- c( "F8766D" # 1. Salmon ) # 2 categories colors2 <- c( "F8766D", # 1. Salmon "00BFC4" # 2. Turquoise ) # 3 categories colors3 <- c( "F8766D", # 1. Salmon "00BA38", # 2. Green "619CFF" # 3. Cornflower Blue ) # 4 categories colors4 <- c( "F8766D", # 1. Salmon "7CAE00", # 2. Olive Green "00BFC4", # 3. Turquoise "C77CFF" # 4. Lavender ) # 5 categories colors5 <- c( "F8766D", # 1. Salmon "A3A500", # 2. Olive Green "00BF7D", # 3. Shamrock Green "00B0F6", # 4. Deep Sky Blue "E76BF3" # 5. Violet ) # 6 categories colors6 <- c( "F8766D", # 1. Salmon "B79F00", # 2. Dark Gold "00BA38", # 3. Green "00BFC4", # 4. Cyan "619CFF", # 5. Cornflower Blue "F564E3" # 6. Heliotrope ) # 7 categories colors7 <- c( "F8766D", # 1. Salmon "C49A00", # 2. Amber "53B400", # 3. Lime Green "00C094", # 4. Green "00B6EB", # 5. Sky Blue "A58AFF", # 6. Lavender "FB61D7" # 1. Pink )