Fast Fourier transform: Difference between revisions
→{{header|Mathematica}} / {{header|Wolfram Language}}: error fix
m (added whitespace.) |
|||
Line 1,988:
Here is a user-space definition for good measure.
<lang Mathematica>fft[{x_}] := {N@
fft[l__] :=
Join[#, #] &@fft@l[[1 ;; ;; 2]] +
|