       Re: Baffling Failure when plotting multiple curves.

• To: mathgroup at smc.vnet.net
• Subject: [mg44173] Re: Baffling Failure when plotting multiple curves.
• From: bobhanlon at aol.com (Bob Hanlon)
• Date: Sat, 25 Oct 2003 06:26:23 -0400 (EDT)
• References: <bnao48\$4ei\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```See on-line help for Plot regarding use of Evaluate with Plot's arguments

voteCurves[pnts_List]:=
pnts.{Cos[t*Degree],Sin[t*Degree]};

voteCurves[{{a,b},{c,d},{e,f}}]

{a*Cos[Degree*t] + b*Sin[Degree*t], c*Cos[Degree*t] +
d*Sin[Degree*t], e*Cos[Degree*t] + f*Sin[Degree*t]}

p1 = {158, 116};
p2 = {74 , 135};

Plot[
Evaluate[voteCurves[{p1,p2}]],
{t,-90,180},
AxesOrigin->{0,0},
PlotRange->{{-90,180},{0,255 Sqrt}},
AspectRatio->1,
Frame->True];

Bob Hanlon

In article <bnao48\$4ei\$1 at smc.vnet.net>, Bob Harris <nitlion at mindspring.com>
wrote:

<< Am having trouble getting collections of 2D function plots to work.  I have
created a function that returns a list of "equations" in one variable,
theta.  I.e. an equation is an expression like 17 Cos[theta] + 10
Sin[theta].  When I try to plot this list of functions AS THE RETURN VALUE
OF MY FUNCTION, Mathematica complains (details below).  However, if I
evaluate the function first, then cut and paste the result into the call to
Plot, it works ok (but this is not very useful to me, since I want to
incorporate this into a larger function).  Further, if my function returns a
list with only one equation in it, then handing the function call to Plot
works.  I'm clueless as to what he difference is. >><BR><BR>

```

• Prev by Date: Re: recode procedural algorithm to faster functional module
• Next by Date: Re: Re: How do I make Combinatorica graphs of publishable quality?
• Previous by thread: Re: Baffling Failure when plotting multiple curves.
• Next by thread: Re: Baffling Failure when plotting multiple curves.