Re: What is the problem? There are no images and no wrong reports for
- To: mathgroup at smc.vnet.net
- Subject: [mg112365] Re: What is the problem? There are no images and no wrong reports for
- From: peter <justwanglunwei at gmail.com>
- Date: Sat, 11 Sep 2010 05:43:26 -0400 (EDT)
- References: <i64kgr$3al$1@smc.vnet.net> <i6a5j9$kol$1@smc.vnet.net>
On Sep 9, 4:24 pm, apjs64 <apj... at gmail.com> wrote: > On Sep 7, 4:02 pm, peter <justwanglun... at gmail.com> wrote: > > > Hello Mathematica community, I really need some help.... > > I realized there are some mistakes in this program, but I can't find > > out what it is, I keep trying for weeks, still there are some > > problem, I never used Mathematica before > > > a==Exp[(-2r^2)/3]; > > b==BesselJ[0,(r*Sqrt[x^2+y^2])/0.8]; > > c==r^2; > > d==5a; > > Plot[Abs[Integrate[r*b*a*Exp[-I(c+d)]dr,{r,0,=E2=88=9E}]]^2,{x,-.0= > 1,0.01}, > > {y,-0.01,0.01}] > > > =EF=BC=88I is Complex i=EF=BC=89 > > Hi Peter, > > a = Exp[(-2 r^2)/3] > > == is equivalence. > > The Plot... line has a lot of problems. Break it down step by step, > get each inner component > working and then build it back up. > > regards, > > Jeremy thank you~i'll work harder~