s_e_irrad2rgb(w.length, s.e.irrad, sens = photobiology::ciexyzCMF2.spct,
color.name = NULL, check = TRUE)
rgb_spct
,
w_length2rgb
,
w_length_range2rgb
my.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