Problem with Map & For Loop !
- To: mathgroup at smc.vnet.net
- Subject: [mg128157] Problem with Map & For Loop !
- From: charitonick at gmail.com
- Date: Wed, 19 Sep 2012 04:59:19 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
Dear Mathematica Users & Developers,
First of all thank you a priori for your help.
I have a "Strange" problem with a For loop and Image Manipulation, into which I would very much appreciate your help.
SetDirectory["C:\\Something\\images"] ; (*is the directory of my images, about 1000 images in there*)
names = FileNames["*.tif"];
images = Map[Import, names];
(*The problem now is that I want to take from all the picture, the same pixel value, and I want to do that for several pixels. More specifically for Y pixels from 0 to 302. So: *)
PixX = {5, 5};
b=0;
While [b < 302, PixY = Table[{10, b}, {b, 302}]; b++;] (*In order to fill a table with the Y pixels that I want to take their values*)
Next I thought a FOR loop:
For[i < 302, i++, Map[ImageTake[#, PixY[[i]], PixX] &, images]]
My problem is that, Mathematica gives *no output* to that command, and I really don't know how, and if I can, assign a different name to the output of this command each time, in order to use afterwards ImageData[name] and take the pixel values each time.
Am I thinking something wrong?
Sincerely yours,
Nikos