powered by
maptocolors(vec, col, num = 100, range = NULL)
plot((1:10),col=maptocolors(vec=(1:10),colorRampPalette(c("blue","red"))),pch=19,cex=4)
Run the code above in your browser using DataLab