1. library(RColorBrewer)
    2. myCol <- brewer.pal(5, "Pastel2")