Re: Fourier Help!!
- To: mathgroup at smc.vnet.net
- Subject: [mg6455] Re: [mg6434] Fourier Help!!
- From: BobHanlon at aol.com
- Date: Fri, 21 Mar 1997 23:00:03 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
$Version Power Macintosh 2.2 (February 24, 1994) ?Fourier Fourier[list] finds the discrete Fourier transform of a list of complex numbers. Fourier[{-1, -1, -1, 1, 1, 1}] Fourier[{-1, -1, -1, 1, 1, 1}] Returns unevaluated because input is a list of integers. Using reals: Fourier[{-1., -1., -1., 1., 1., 1.}] // Chop {0, -0.816497 - 1.41421 I, 0, -0.816497, 0, -0.816497 + 1.41421 I} InverseFourier[%] // Chop {-1., -1., -1., 1., 1., 1.} Alternatively, Fourier[{-1, -1, -1, 1, 1, 1}] // N // Chop {0, -0.816497 - 1.41421 I, 0, -0.816497, 0, -0.816497 + 1.41421 I} InverseFourier[%] // Chop {-1., -1., -1., 1., 1., 1.} Bob Hanlon