MathGroup Archive 2005

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

Search the Archive

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)





  • Prev by Date: How to get an answer as a Root object?
  • Next by Date: Re: Re: Beginner : how to convert .bmp or .jpeg for digital processing
  • Previous by thread: Re: How to get an answer as a Root object?
  • Next by thread: Errors from FindFit