MathGroup Archive 1999

[Date Index] [Thread Index] [Author Index]

Search the Archive

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




  • Prev by Date: Problems with NotebookOpen in Mathematica 4. on WindowsNT
  • Next by Date: Re: Graphics3D[] objects clipping & PlotRange
  • Previous by thread: gray levels on combined graphics
  • Next by thread: DiracDelta Function question