## Not run: ------------------------------------
# data(flowers)
# vis.flowers <- vismodel(flowers, visual = 'apis', achro = 'l')
# tri.flowers <- colspace(vis.flowers, space = 'tri')
## ---------------------------------------------
Run the code above in your browser using DataLab