| Author |
Comment/Response |
fee
|
 01/18/12 11:27am
Hi,
I use mathematica to plot a vector field and its nullisoclines.
v and w are the axes. The scale of them are different. v is on [-0.4;1.5] while w is on [-0.2;0.2]. I want every vector has the same length.
I use the following code:
Epsilon := 0.01
a := 0.3
Gamma := 3
graphs := Plot[{-v*(v - a)*(v - 1)}, {v, -0.4, 1.2},
PlotRange -> {{-0.4, 1.2}, {-0.2, 0.3}},
PlotStyle -> {{Black, Thick}, {Black, Thick}}, AspectRatio -> 1,
AxesStyle -> Arrowheads[0.03] ]
vecs := VectorPlot[{-v*(v - a)*(v - 1) -
w, \[Epsilon]*(v - \[Gamma]*w)}, {v, -0.4, 1.2}, {w, -0.198,
0.25}, Axes -> True, VectorScale -> {0.04, Automatic, None}]
Show[graphs, vecs, AxesLabel -> {"v", "w"}]
(For corresponding picture see attachment.)
Here every would have vector the same length IF the scale of both axis were the same.
Actually I have no idea to scale them corretly.
Does anybody has an idea?
Regards,
fee
Attachment: example.png, URL: , |
|
