Drexel dragonThe Math ForumDonate to the Math Forum



Search All of the Math Forum:

Views expressed in these public forums are not endorsed by Drexel University or The Math Forum.


Math Forum » Discussions » Software » comp.soft-sys.math.mathematica

Topic: Re: [mg5358] bodeplot
Replies: 0  

Advanced Search

Back to Topic List Back to Topic List  
Andrew B. Watson

Posts: 2
Registered: 12/7/04
Re: [mg5358] bodeplot
Posted: Dec 6, 1996 11:47 PM
  Click to see the message monospaced in plain text Plain Text   Click to reply to this topic Reply

Jari-Pascal Curty wrote:
>
> Hi there,
>
> does anyone know a script for Mma that could do a bodeplot.


BodePlot[f_, range_, opts___Rule]:=
Show[GraphicsArray[
MapThread[
((#1[#2[f], range, opts,
DisplayFunction -> Identity,
PlotRange -> {Drop[range, 1], Automatic},
Frame -> {True, True, False, False},
FrameLabel -> {"Hz", #3}]))&,
{{LogLogPlot, LogLinearPlot}, {Abs, Arg}
, {"Magnitude", "Phase"}}]]
, DisplayFunction -> $DisplayFunction]



BodePlot[(I 2 Pi w .05 + 1) ^ (-6), {w,1,100}]


--
Andrew B. Watson
MS 262-2 NASA Ames Research Center
Moffett Field CA 94035-1000
(415) 604-5419 -3323 fax
beau@vision.arc.nasa.gov
http://vision.arc.nasa.gov/







Point your RSS reader here for a feed of the latest messages in this topic.

[Privacy Policy] [Terms of Use]

© Drexel University 1994-2014. All Rights Reserved.
The Math Forum is a research and educational enterprise of the Drexel University School of Education.