Re: Image Processing
- To: mathgroup at smc.vnet.net
- Subject: [mg66082] Re: Image Processing
- From: "Mariusz Jankowski" <mjankowski at usm.maine.edu>
- Date: Sat, 29 Apr 2006 03:40:14 -0400 (EDT)
- Organization: University of Southern Maine
- References: <e2srgo$3bv$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi Charlie, solution number one is to get the Digital Image Processing
package, solution number two is:
img = Import[filename, "JPEG"];
rawdata = img[[1,1]];
{r,g,b} = Transpose[Transpose/@rawdata];
ListDensityPlot[Abs[Fourier[r]], Mesh->False];
Good luck, Mariusz
>>> On 4/28/2006 at 6:41 am, in message <e2srgo$3bv$1 at smc.vnet.net>,
Charlie
Springer<RAM at regnirps.com> wrote:
> Hi all.
>
> Old physicist, new Mathematica user.
>
> I want to perform 2D FFT's on images. I have used Import to get a JPEG
> into
> apparently, a graphic object. I can not see how to get it into a "list
> of
> lists" or any form acceptable to Fourier[].
>
> Anybody have a snippet or some experience? I'm still learning the
> terminology. If this works out I'll get the grid version for a Mac Quad.
>
> -- Charlie Springer