From stack overflow assuming you have a column called “colour” in “tt”:

colour_named_vector <-setNames(as.character(tt$colour), 
tt$colour)
> colour_named_vector
  #FFFFFF   #FEFEFE   #FEFCFF   #FBFFFF   #F7FFFF   #FFFDFF 
"#FFFFFF" "#FEFEFE" "#FEFCFF" "#FBFFFF" "#F7FFFF" "#FFFDFF" 
> typeof(colour_named_vector)
[1] "character"

Leave a comment on github