       RE: Vector field with ImplicitPlot ?

• To: mathgroup at smc.vnet.net
• Subject: [mg37447] RE: [mg37439] Vector field with ImplicitPlot ?
• From: "David Park" <djmp at earthlink.net>
• Date: Wed, 30 Oct 2002 00:50:51 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```Madhusudan,

I'm certain there is a way to obtain a nice plot for your function, but
since you do not supply a COMPLETE example nor a valid email address you
severely limit your chances for a response.

David Park

From: Madhusudan Singh [mailto:spammers-go-here at yahoo.com]
To: mathgroup at smc.vnet.net

I wish to do plot a vector field plot of an implicit solution.

Equations :

(*V[x] is a polynomial function defined earlier *)
e[x_, v_] := 1/2 v^2 + V[x];
t3 = Table[e[x, v] == e1, {e1, 0, 1, 0.2}];
ImplicitPlot[Evaluate[t3], {x, \(-2\), 2}];

This plots a nice implicit plot for various values of e1. What I wish to do
is to attach a
"sense" to the contours (an arrow that describes the direction of the
orbit).

However, I am at a loss as to how to do it with PlotVectorField.

Any help would be appreciated.

PS : Is there a way in which I can "automate" the labelling of the curves
with the values
of e1 they are plotted for (something better than manually editing the
labels to the plot
each time I change the range of e1) ?

--
Linux
3:29pm up 2:28, 1 user, load average: 0.07, 0.20, 0.16

```

• Prev by Date: Newbie: convolution of impulse sequences
• Next by Date: OO in Mathematica
• Previous by thread: Vector field with ImplicitPlot ?
• Next by thread: HelpBrowser Mathematica Book 1.8.3 on Linux