s_e_irrad2rgb(w.length, s.e.irrad, sens = photobiology::ciexyzCMF2.spct,
color.name = NULL, check = TRUE)rgb_spct,
w_length2rgb,
w_length_range2rgbmy.color <-
with(sun.data, s_e_irrad2rgb(w.length, s.e.irrad, color.name="sunWhite"))
col2rgb(my.color)Run the code above in your browser using DataLab