# NOT RUN {
data(flowers)
vis.flowers <- vismodel(flowers, visual = "cie10", illum = "D65", vonkries = TRUE, relative = FALSE)
flowers.ciexyz <- colspace(vis.flowers, space = "ciexyz")
flowers.cielab <- colspace(vis.flowers, space = "cielab")
flowers.cielch <- colspace(vis.flowers, space = "cielch")
# }
Run the code above in your browser using DataLab