Re: ParametricPlot problem
- To: mathgroup at smc.vnet.net
- Subject: [mg97810] Re: ParametricPlot problem
- From: ADL <alberto.dilullo at tiscali.it>
- Date: Sun, 22 Mar 2009 05:48:43 -0500 (EST)
- References: <gq2eri$ea1$1@smc.vnet.net>
The easiest thing might be to do:
ParametricPlot[{Re[transfer[10^f]], Im[transfer[10^f]]}, {f, 0, 8}]
ADL
On 21 Mar, 11:17, "Serych Jakub" <Ser... at panska.cz> wrote:
> Dear M users,
> I'm trying to draw phasor characteristic of simple RC low pass filter. It=
s
> transfer function is:
>
> r = 100;
> c = 0.00001;
> transfer[f_] := 1/(1 + I 2 \[Pi] f r c);
>
> The phasor characteristic should be drawn with:
>
> ParametricPlot[{Re[transfer[f]], Im[transfer[f]]}, {f, 0, Infinity}]
>
> I can understand, that Mathematica has problem with calculation of the
> transfer function for frequency from 0 to Infinity, so I tried to use 10^=
8 in
> the place of infinity. But as the ParametricPlot IMHO subdivides the
> frequency range into constant intervals, it draws piece of the curve o=
nly
> for frequencies near to 10^8.
> I found that the relatively reasonable result is with frequency range 0 t=
o
> 10^3:
>
> ParametricPlot[{Re[transfer[f]], Im[transfer[f]]}, {f, 0, 10^3}]
>
> but there is missing the part of curve near to coordinates origin.
>
> Is there any way to tell the ParametricPlot to divide the interval of the
> frequency in logarithmic manner to have the possibility to draw the phaso=
r
> characteristic in the bigger frequency range?
>
> I tried the PlotPoints and PerformanceGoal options, but it doesn't help (=
or I
> cannot use it).
>
> Thanks a lot for any help
>
> Jakub