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: plotting integrals
Replies: 2   Last Post: Sep 21, 2013 4:24 AM

Advanced Search

Back to Topic List Back to Topic List Jump to Tree View Jump to Tree View   Messages: [ Previous | Next ]

Posts: 40
Registered: 11/2/11
plotting integrals
Posted: Sep 20, 2013 6:52 AM
  Click to see the message monospaced in plain text Plain Text   Click to reply to this topic Reply

Dear All,

I would like to plot the function Subscript[\[Eta], B] but I got errors.
Could someone please help me with these errors?

\[Psi][x_, \[Omega]_] := (\[Omega]/\[Pi])^(1/4)
Exp[-1/2 \[Omega] x^2]

\[Psi]1[x_, a_, n_] := Sqrt[(2 n)!!/((2 n - 1)!! \[Pi])] Cos [a*x]^n

Subscript[F, TPT][x_, a_, n_] :=
NIntegrate[\[Psi]1[x, a, n]*\[Psi][x,
a*Sqrt[2 n (n - 1)]], {x, -\[Pi]/2, \[Pi]/2}]

Subscript[\[Eta], B][x_, a_,
n_] := Sqrt[(1 - Subscript[F, TPT][x, a, n])]

Plot[Subscript[\[Eta], B][x, 1, 3], {x, -\[Pi]/2, \[Pi]/2}]

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.