powered by
Converts wavelengths in nanometers into corresponding visible colors.
wav2RGB(wav)
Returns a character vector of the same length as wav, with an RGB color for each wavelength. Wavelengths out of visible ranges return black.
wav
Numeric vector of wavelengths (in nanometers) to convert into colors.
Sylvain Mareschal
http://codingmess.blogspot.fr/2009/05/conversion-of-wavelength-in-nanometers.html
wv <- seq(from=300, to=800, by=10) plot(x=wv, y=rep(1, length(wv)), col=wav2RGB(wv), pch=19)
Run the code above in your browser using DataLab