powered by
rainbow
rev
revrainbow(n = 256, ...)
rev(rainbow(start=0, end=2/3, ...))
x <- matrix(rnorm(100), ncol=10) image(x, col=revrainbow())
Run the code above in your browser using DataLab