Re: gray levels on combined graphics
- To: mathgroup at smc.vnet.net
- Subject: [mg21139] Re: gray levels on combined graphics
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Fri, 17 Dec 1999 01:21:40 -0500 (EST)
- References: <831vm5$g95@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
"David Ozonoff" <dozonoff at bu.edu> wrote in message news:831vm5$g95 at smc.vnet.net... > I have been trying to combine the output of NDSolve which gives solutions > to a 2D ODE system with several initial points and the PlotVectorField > output. I want the latter to be gray and the former dark. When I combine > them with Show the product defaults to the graphics directive of the first > mentioned. How do I keep different gray levels on combined graphics? Any > help appreciated. > David, The following seems to be doing the kind of thing that you want: gr1 = Plot[3 Sin[x], {x, 0, Pi}, PlotStyle -> {{Hue[.8], Thickness[.02]}}] gr2=PlotVectorField[{Sin[x], Cos[y]}, {x, 0, Pi}, {y, 0, Pi}, ColorFunction->(Hue[0]&)] Show[gr1, gr2] -- Allan --------------------- Allan Hayes Mathematica Training and Consulting Leicester UK www.haystack.demon.co.uk hay at haystack.demon.co.uk Voice: +44 (0)116 271 4198 Fax: +44 (0)870 164 0565