> col1 <- c("wheat", "firebrick", "navy")
> col2 <- c("#009fb7", "#fed766", "#696773")
> col3 <- c("goldenrod", "#85898a")
> col4 <- c(ku_blue = "#0051ba", ku_crimson = "#e8000d", "#ffc82d")
> pal1 <- color_palette(col1)
> pal2 <- color_palette(col2)
> pal3 <- color_palette(col3)
> pal4 <- color_palette(col4)
> print(pal1)
<color_palette[3]>
    wheat 
    firebrick 
    navy 

> print(pal2)
<color_palette[3]>
    #009fb7 
    #fed766 
    #696773 

> print(pal3)
<color_palette[2]>
    goldenrod 
    #85898a 

> print(pal4)
<color_palette[3]>
    ku_blue 
    ku_crimson 
    #ffc82d 

