Re: Show two vector fields with different arrow colors

*To*: mathgroup at smc.vnet.net*Subject*: [mg57135] Re: [mg57119] Show two vector fields with different arrow colors*From*: "David Park" <djmp at earthlink.net>*Date*: Tue, 17 May 2005 01:19:58 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

With DrawGraphics it's easy. Needs["DrawGraphics`DrawingMaster`"] Draw2D[ {Red, DrawVectorField[{y, -x}, {x, 0, 1}, {y, 0, 1}], Green, DrawVectorField[{x, y}, {x, 0, 1}, {y, 0, 1}]}, AspectRatio -> Automatic, Background -> Linen, ImageSize -> 450]; David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: Niels L. Ellegaard [mailto:gnalle at ruc.dk] To: mathgroup at smc.vnet.net Dear Masters I would like to plot two vector fields in the same graph. However I need the arrows of the two fields to have different colors. Is there a sneaky way to do this? I tried the following, but in the third plot all arrows become red. p1 := PlotVectorField[{y,-x},{x,0,1},{y,0,1}, DefaultColor -> RGBColor[1, 0, 0]]; p2 := PlotVectorField[{x,y},{x,0,1},{y,0,1}, DefaultColor -> RGBColor[0, 1, 0]] ; Show[p1,p2] Thanks in advance Niels PS: I am using a slightly old version, so I cannot apply PlotVectorField to a list In[53]:= $Version Out[53]= Silicon Graphics 3.0 (September 16, 1997)