Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'A numerical integration problem' topicStudent Support Forum > General > "A numerical integration problem"

< Previous CommentHelp | Reply To Comment | Reply To Topic
Author Comment/Response
Bill Simpson
05/17/13 11:03am

In Response To 'Re: Re: A numerical integration problem'
---------
I apologize for not being clear. I had evaluated the three assignments for d, b and R that you showed in your original post. Then I evaluated the integral.

Here is a fresh notebook evaluated once.

In[1]:= d = 1.849 10^-6;
b = 5.57411 10^-7;
R = 40 10^-6;
Integrate[r^2 Sin[\[Theta]] E^(-((r - R)^2/b^2)) E^(-((r^2 (Cos[\[Theta]])^2)/d^2)) E^(-I r q (Cos[\[Theta]] Cos[\[Psi]] + Cos[\[Phi] - \[CurlyPhi]] Sin[\[Theta]] Sin[\[Psi]])), {\[Phi], 0, 2 \[Pi]}, {\[Theta], 0, \[Pi]}, {r, 0, \[Infinity]}]

Out[1]= 0

In[2]:= NIntegrate[ Sin[\[Psi]] q^2 q^2/(b^2 q^4 + 1^2) 0, {\[CurlyPhi], 0, 2 \[Pi]}, {\[Psi], 0, \[Pi]}, {q, 0, \[Infinity]}]

During evaluation of In[2]:= NIntegrate::izero: Integral and error estimates are 0 on all integration subregions. Try increasing the value of the MinRecursion option. If value of integral may be 0, specify a finite value for the AccuracyGoal option. >>

Out[2]= 0.

You should carefully study the first integral to try to verify that the result is exactly correct.

URL: ,

Subject (listing for 'A numerical integration problem')
Author Date Posted
A numerical integration problem Wenle Weng 05/12/13 11:05pm
Re: A numerical integration problem Bill Simpson 05/13/13 12:38pm
Re: Re: A numerical integration problem Wenle Weng 05/16/13 8:55pm
Re: Re: Re: A numerical integration problem Bill Simpson 05/17/13 11:03am
< Previous CommentHelp | Reply To Comment | Reply To Topic