The Math Forum

Search All of the Math Forum:

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

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

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

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]:=
((#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

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

[Privacy Policy] [Terms of Use]

© The Math Forum at NCTM 1994-2018. All Rights Reserved.