spectra2CCT: Correlated Color Temperature (CCT) from spectra
In colorscience: Color Science Methods and Data

Description Usage Arguments Value Author(s) Source References Examples

spectra2CCT Correlated Color Temperature (CCT) from spectra.

1
2
3

spectra2CCT(SPD=NA, isoTempLinesTable=NA,
CIETable = get("ciexyz31", envir = environment()), TCS = get("TCSdata", 
envir = environment()))

`SPD`	light source spd
`isoTempLinesTable`	Iso temperature lines table
`CIETable`	reference data values
`TCS`	spectral reflectance data of 14 color test samples for CRI

Correlated Color Temperature (CCT)

Jose Gama

Rensselaer Polytechnic Institute Light Sources and Color Q & A Appendix B: MATLAB script for calculating measures of light source color: CCT, CRI, GA, and FSI http://www.lrc.rpi.edu/programs/nlpip/lightinganswers/lightsources/appendixb1.asp

# illuminant A
SPD = illuminants[1:51*2-1,c('wlnm','A')] # every 10 nm
CCT <- spectra2CCT(SPD)
CCT

Loading required package: Hmisc
Loading required package: lattice
Loading required package: survival
Loading required package: Formula
Loading required package: ggplot2

Attaching package: 'Hmisc'

The following objects are masked from 'package:base':

    format.pval, round.POSIXt, trunc.POSIXt, units

Loading required package: munsellinterpol
Loading required package: geometry
Loading required package: magic
Loading required package: abind
Loading required package: pracma

Attaching package: 'pracma'

The following object is masked from 'package:munsellinterpol':

    hypot

The following objects are masked from 'package:geometry':

    dot, polyarea

The following object is masked from 'package:magic':

    magic

The following object is masked from 'package:Hmisc':

    ceil

Loading required package: sp

Attaching package: 'colorscience'

The following objects are masked from 'package:munsellinterpol':

    XYZ2xyY, xyY2XYZ

x <-  0.4475996 	y <-  0.407533 
[1] 2855.84