# NOT RUN {
data(flowers)
vis.flowers <- vismodel(flowers, qcatch = 'Qi', visual = 'musca', achro = 'none', relative = TRUE)
cat.flowers <- colspace(vis.flowers, space = 'categorical')
plot(cat.flowers)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab