       Re: Fourier Transform Graph Coordinates

• To: mathgroup at smc.vnet.net
• Subject: [mg95036] Re: [mg95022] Fourier Transform Graph Coordinates
• From: Bob Hanlon <hanlonr at cox.net>
• Date: Sun, 4 Jan 2009 07:31:30 -0500 (EST)

```data = Abs[Fourier[{-1, -1, -1, -1, 1, 1, 1, 1}]]

{0.,1.84776,0.,0.765367,0.,0.765367,0.,1.84776}

{"x", "y"}] // Grid

Prepend[Transpose[{Range[Length[data]], data}],
{"x", "y"}] // Grid

p = ListLinePlot[data]

Prepend[p[[1, 1, 3, 2, 1]], {"x", "y"}] // Grid

Prepend[Cases[p, Line[{pts__}] :> pts,
Infinity], {"x", "y"}] // Grid

Bob Hanlon

On Sat, Jan 3, 2009 at 9:03 AM , DAVID FOURIE wrote:

> Hi all,
>
> I am wanting to compare Fourier Transform graphs in a Java Program.
> For thi=
> s I need the coordinates, or graph points of the created Fourier
> Transform =
> graph.
>
> For example using the Mathematica example:
>
>         In[]:=  Fourier[{-1,-1,-1,-1,1,1,1,1}]
>         Out[]:= {0.\[InvisibleSpace] + 0. \[ImaginaryI], -0.707107 -
> 1.70=
> 711 \[ImaginaryI], 0.\[InvisibleSpace] + 0. \[ImaginaryI], -0.707107 -
> 0.29=
> 2893 \[ImaginaryI], 0.\[InvisibleSpace] + 0. [ImaginaryI], -0.707107 +
> 0.29=
> 2893 \[ImaginaryI], 0.\[InvisibleSpace] + 0. \[ImaginaryI], -0.707107
> + 1.7=
> 0711 \[ImaginaryI]}
>
>         In[]:=  ListPlot[Abs[Fourier[{-1, -1, -1, -1, 1, 1, 1, 1}]],
>         Out[]:= A zig zag graph.
>
>
> I want the coordinates of this graph. I have tried exporting it as a
> table =
> but it is indecipherable. Idealy the graph would be in the style:
> X       Y
> 1       10
> 2       23
> 3       24
> 4       27
> 5       31
>
> Etc
>
> The style is not the concern though it is just getting the data which
> gener=
> ates the graph.
>
> Yours
>
>
>
> David Fourie BSc Computer Science
> David.fourie at ncl.ac.uk
> MPhil Computational Neuroscience
> D809
> ext - 8593

```

• Prev by Date: Re: Shorthand for MapThread
• Next by Date: Re: Locators with complete graph, Kn
• Previous by thread: Re: Fourier Transform Graph Coordinates
• Next by thread: Re: Problem in Dot Product of 4x4 Matrices with