MathGroup Archive 2000

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

Search the Archive

Re: newbie PolarPlot question

  • To: mathgroup at smc.vnet.net
  • Subject: [mg25070] Re: [mg25046] newbie PolarPlot question
  • From: BobHanlon at aol.com
  • Date: Thu, 7 Sep 2000 22:28:13 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

In a message dated 9/3/2000 10:22:37 PM, dmagnoli at home.com writes:

>I've defined:
>
>r[t] := 16/(5 + 3 Cos[t])
>
>Then I load Graphics, with:
>
><<Graphics`
>
>and ask for:
>
>PolarPlot[r, {t, 0, 2 Pi}], which tells me:
>
>ParametricPlot::pptr:
>{r Cos[t], r Sin[t]} does not evaluate to a pair
>of real numbers at t = 2.617993877991494`*^-7
>
>ParametricPlot::pptr:
>{r Cos[t], r Sin[t]} does not evaluate to a pair
>of real numbers at t = 0.25488992540742256`.
>
>ParametricPlot::pptr:
>{r Cos[t], r Sin[t]} does not evaluate to a pair
>of real numbers at t = 0.5328694051959509`.
>
>General::stop:
>Further output of ParametricPlot ::pptr will be
>suppressed during this calculation.
>
>Near as I can make out, x and y should both evaluate to real numbers for
>any value of theta between 0 and 2 Pi, so I don't know what I'm doing
>wrong.
>

Needs["Graphics`Graphics`"];

The function definition should read:

r[t_] := 16/(5 + 3 Cos[t]);

The plot call should read:

PolarPlot[r[t], {t, 0, 2 Pi}];


Bob Hanlon


  • Prev by Date: How to keep things real?
  • Next by Date: new Mathematica-related books
  • Previous by thread: Re: newbie PolarPlot question
  • Next by thread: RE: newbie PolarPlot question