## Not run: ------------------------------------
# data(teal)
# spec2rgb(teal)
#
# # Plot data using estimated perceived color
# plot(teal, col = spec2rgb(teal), type = 'o')
## ---------------------------------------------
Run the code above in your browser using DataLab