## Not run: ------------------------------------
# data(flowers)
# vis.flowers <- vismodel(flowers, visual = 'cie10', illum = 'D65')
# flowers.ciexyz <- colspace(vis.flowers, space = 'ciexyz')
# flowers.cielab <- colspace(vis.flowers, space = 'cielab')
## ---------------------------------------------
Run the code above in your browser using DataLab