powered by
XYZ2Lab
XYZ2Lab(XYZmatrix,illuminant='D65',observer=2,RefWhite=XYZperfectreflectingdiffuser)
XYZ<-c(0.11465380, 0.08391198, 0.08222077) CIELMatrix<-xyz2lab(XYZ*100)
Run the code above in your browser using DataLab