Joy of colour

I felt I had to share this gorgeously simple trick for finding the colour name you need in R.

col.wheel <- function(str, cex=0.75) {
   cols <- colors()[grep(str, colors())]
   pie(rep(1, length(cols)), labels=cols, col=cols, cex=cex)
   cols
 }
#then just do:
col.wheel("slate")
#or:
 col.wheel("gold")
#or whatever.

Kudos to http://www.stubbornmule.net/2011/11/colour-wheels-in-r/