I have developed severe cataracts and can no longer read or use black on any light color. I need to invert it so that it is light on black. When I convert graphics by hand I have to convert it back by hand before it can be converted to pdf for publication. I have hundreds of such graphics and converting them by hand is very cumbersome and error-prone (particularly when I cannot see the end result). Is there any good way to automate this process?
I have an eye disease too and prefer inverted colors also. I'd be willing to meet for an hour to solve this problem with you if we could meet on a video call and work together to solve the issue. What I'd hope for in return is that you'd post a recording of our meeting and outline of the final solution. Would this exchange be of interest to you? If so, get in contact via kylekeane.com
Probably not that easy like from drawing tools. But all that advise given to you is still relevant even if you want to use drawing system in Mathematica. It creates a Graphics object that you can place inside Show to adjust properties or use image processing to process. Everything is an expression in Wolfram Language
Graphics
Show
http://reference.wolfram.com/language/tutorial/EverythingIsAnExpression.html
even Graphics, so it can be manipulated further. For example see GIF below where I use
ColorNegate@Rasterize@object
to upgrade Danny's method. Just apply InputForm to your Graphics object to see code inside.
InputForm
I think I understand what you are saying. Convert the picture I draw into a labeled graphics object, and then transform it using the method you suggest. I will try that. Thanks. Just FYI, I am unable to read the attached graphic as the white background washes out everything in the foreground.
I guess I was not too clear, I need a way to invert graphics created using the drawing system in Mathematica.
Thanks, I was hoping fo some clues as to drawn graphics.
Also PlotTheme -> "Marketing" seem to give a dark background.
PlotTheme -> "Marketing"
In some cases a black background changes automatically the color of the plot elements to a light color:
Plot[Sin[x], {x, 0, 2 Pi}, Background -> Black]
but you may have to check and tweak case by case.
I am actually looking for images using the drawing system.
I will give this a try! Thanks much!
