## Not run:
# data(flowers)
# vis.flowers <- vismodel(flowers, visual = 'apis', qcatch = 'Ei', relative = FALSE,
# vonkries = TRUE, achro = 'l', bkg = 'green')
# flowers.hex <- colspace(vis.flowers, space = 'hexagon')
# ## End(Not run)
Run the code above in your browser using DataLab