Convert list of LABColors to list of RGBColors

Question

I have a list of LABColors: {{l1,a1,b1},{l2,a2,b2}..{ln,an,bn}} I want to convert it to a list of RGBColors of same form: {{r1,g1,b1}, {r2,g2,b2}, .. {rn,gn,bn}}

I have been trying for a few hours but I keep running into snags ..

for example: c1 = LABColor[l1,a1,b1] -> I get a color swatch

ColorConvert[c1, "RGB"] -> I get a good transform, but it is a color swatch

ColorConvert[c1, "RGB"] // InputForm -> I get RGBColor[r1,g1,b1]

and I am stuck here.

I need the result to be in list form {{r1, g1, b1},...}

Thanks for any suggestions, pointers :)

Answer 1

Here is some LAB color data in the form of an $n\times3$ array of real numbers:

labdata = 
  Diagonal[
   ImageData@
    ColorConvert[ExampleData[{"TestImage", "Mandrill"}], "LAB"]];

Here is the conversion to an RGB array:

rgb1 = First@
   ImageData@
    ColorConvert[Image[{labdata}, ColorSpace -> "LAB"], "RGB"];

Another (slower) way:

rgb2 = ColorConvert[labdata, "LAB" -> "RGB"] /. RGBColor -> List