Re; FourierTransform problem

*To*: mathgroup at smc.vnet.net*Subject*: [mg35106] Re; FourierTransform problem*From*: Matthias.Bode at oppenheim.de*Date*: Tue, 25 Jun 2002 03:40:03 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Hello David, 1. I could not reproduce your error messages in version 4.1 - I got a rather steep "sugar cone" that peaked at x = 0, y = 0.8. 2. I remember that Plot[Evaluate[your function], ....] often worked in version 3.0. 3. Workaround: Make a Table[your function, ....] = list01 and use ListPlot[list01]. 4. Upgrading to release 4.1 is worth its money. Best regards, Matthias Bode Sal. Oppenheim jr. & Cie. KGaA Koenigsberger Strasse 29 D-60487 Frankfurt am Main GERMANY Tel.: +49(0)69 71 34 53 80 Mobile: +49(0)172 6 74 95 77 Fax: +49(0)69 71 34 95 380 E-mail: matthias.bode at oppenheim.de Internet: http://www.oppenheim.de -----UrsprÃ¼ngliche Nachricht----- Von: David Turner [mailto:dturner at faulkner.edu] Gesendet: Montag, 24. Juni 2002 09:21 An: mathgroup at smc.vnet.net Betreff: [mg35081] FourierTransform problem Hello, I am using Mathematica for Students 3.0.1 with Windows 98. When I execute the following code, I get the error messages below: In[1]:= <<Calculus`FourierTransform` In[2]:= Clear[fx, fw, a] In[3]:= a:=1 In[4]:= fx[x_]:=Exp[-Abs[x*a]] In[5]:= fw[w_]:=InverseFourierTransform[fx[x], x, w] In[6]:= Plot[fw[w], {w, -5*a,5*a}] Plot::plnr : fw[w] is not a machine-size real number at w = -5.. Plot::plnr : fw[w] is not a machine-size real number at w = -4.59433.. Plot::plnr : fw[w] is not a machine-size real number at w = -4.15191.. General:: stop : Further output of Plot::plnr will be suppressed during this calculation. Does anyone know where I might obtain a corrected FourierTransform.m package for Mathematica 3.0.1? My copy is dated 7/21/97. I contacted Wolfram about this matter. However, they told me they no longer support version 3.0. I appreciate any help you may provide. Thanks. David