powered by
col.shade(col, shade = 0.5)
newcol <- col.shade("blue")
Run the code above in your browser using DataLab