CVD (version 1.0.2)

Color.Vision.Simulate: Simulate CVDs on images

Description

Color.Vision.Simulate converts images so that the colors look similar to how they are seen by people with CVD.

Usage

Color.Vision.Simulate(fileIN=NULL, fileOUT=NULL, myoptions=NULL, amount=1.0)

Arguments

fileIN

PNG input file

fileOUT

PNG output file

myoptions

CVD from "Protanope","Deuteranope" or "Tritanope"

amount

level from 0.0 to 1.0 for "Achromat"

Value

none

References

Michael Deal Daltonize.org http://mudcu.be/labs/Color/Vision http://www.daltonize.org/p/about.html "Analysis of Color Blindness" by Onur Fidaner, Poliang Lin and Nevran Ozguven. "Digital Video Colourmaps for Checking the Legibility of Displays by Dichromats" by Francoise Vienot, Hans Brettel and John D. Mollon http://vision.psychol.cam.ac.uk/jdmollon/papers/colourmaps.pdf

Examples

# a "perfect" score
## Not run: 
# fname<-paste(system.file(package='CVD'),'/extdata/fruits.png',sep='')
# Color.Vision.Simulate(fname, 'fruits.Simulate.Protanope.png','Protanope')
# Color.Vision.Simulate(fname, 'fruits.Simulate.Deuteranope.png','Deuteranope')
# Color.Vision.Simulate(fname, 'fruits.Simulate.Tritanope.png','Tritanope')
# ## End(Not run)