plotting integrals
- To: mathgroup at smc.vnet.net
 - Subject: [mg131678] plotting integrals
 - From: Herman <btta2010 at gmail.com>
 - Date: Fri, 20 Sep 2013 07:07:37 -0400 (EDT)
 - Delivered-to: l-mathgroup@mail-archive0.wolfram.com
 - Delivered-to: l-mathgroup@wolfram.com
 - Delivered-to: mathgroup-outx@smc.vnet.net
 - Delivered-to: mathgroup-newsendx@smc.vnet.net
 
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}]
- Follow-Ups:
- Re: plotting integrals
- From: Itai Seggev <itais@wolfram.com>
 
 - Re: plotting integrals
- From: Murray Eisenberg <murray@math.umass.edu>
 
 - Re: plotting integrals
- From: Bob Hanlon <hanlonr357@gmail.com>
 
 
 - Re: plotting integrals