       RE: how to extract parameter values

• To: mathgroup at smc.vnet.net
• Subject: [mg37324] RE: [mg37310] how to extract parameter values
• From: "DrBob" <drbob at bigfoot.com>
• Date: Wed, 23 Oct 2002 02:57:09 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Try this:

plot = ParametricPlot[{Cos[5t], Sin[3t]}, {
t, 0, 2ð}, AspectRatio -> Automatic];
lines = Cases[plot, _Line, Infinity]

plot[]
plot[]

Also note that you can operate on a graph my manipulating its first
argument.  For instance, to do a coordinate transformation:

A = {{1, 2}, {-3, 1}};
Show[Graphics[plot[] /. {x_, y_} -> A.{x, y}, plot[]]]

Bobby

-----Original Message-----
From: Jan Mangaldan [mailto:jajem at yahoo.com]
To: mathgroup at smc.vnet.net
Subject: [mg37324] [mg37310] how to extract parameter values

I'd like to know how I can extract the parameter
values used by ParametricPlot in plotting a curve,
e.g. if ParametricPlot used points corresponding to
parameter values 2, 4, 6, etc... I need a way to get
the list {2, 4, 6, ...}.

One solution I know is this:

list={};
ParametricPlot[(AppendTo[list,t]; {f[t]
g[t]}),{t,tmin,tmax}];

The problem with this is that I get an error that
ParametricPlot cannot compile the function, and that
the plotting time is considerably slowed down.
especially if I have a high PlotPoints setting.

Any ideas?

Jan Mangaldan (~_~)

__________________________________________________
Do you Yahoo!?
Y! Web Hosting - Let the expert host your web site
http://webhosting.yahoo.com/

```

• Prev by Date: RE: magnify Help Browser
• Next by Date: Re: Problems about NSolve
• Previous by thread: how to extract parameter values
• Next by thread: RE: how to extract parameter values