computeCCT( D65.1nm ) # returns 6502.068
computeCCT( D65.1nm, isotherms='native' ) # returns 6503.323
computeCCT( A.1nm ) # returns 2855.656
computeCCT( A.1nm, isotherms='native' ) # returns 2855.662
computeCCT( A.1nm, isotherms='mccamy' ) # returns 2857.188
moon = readSpectra( system.file( "extdata/sources/moonlight.txt", package='colorSpec' ) )
computeCCT( moon ) # returns 4482.371
Run the code above in your browser using DataLab