       Re: Code is not working...

• To: mathgroup at smc.vnet.net
• Subject: [mg120575] Re: Code is not working...
• From: Dilek <genetik08 at gmail.com>
• Date: Fri, 29 Jul 2011 08:02:50 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <201107222347.TAA28685@smc.vnet.net> <j0foq7\$8ov\$1@smc.vnet.net> <j0h090\$dgi\$1@smc.vnet.net>

```On 24 Temmuz, 07:39, Jay Bee <jiri.bo... at gmail.com> wrote:
> On Jul 24, 1:25 am, Heike Gramberg <heike.gramb... at gmail.com> wrote:
>
>
>
>
>
> > If you want any useful help you'll probably need to give a bit more
> > information. For example, what are
> > image, RegionGrowing and imgfilter? And what is the function of
> > imageFilled (it doesn't seem to do anything
> > at the moment)?
>
> > Heike.
>
> > On 23 Jul 2011, at 00:47, =?iso-8859-1?Q?S=F6nme... at smc.vnet.net wr=
ot=
> e:
>
> > > Hello,
>
> > > I am in trouble with below codes:
>
> > > I run this code but Program is not finsh evertime It is running and r=
un=
> ning...
> > > Could you possible help me.
>
> > > dim = Dimensions[image]
> > > r = 1;
> > > k = 1;
> > > n = 10;
> > > cost = Function[{positionValues, neighborValues},
> > > =C2  First[neighborValues] == 1];
>
> > > (* Image that only contains the value zero *)
> > > imageNew = Table[0, {i, 1, dim[]}, {j, 1, dim[]}];
>
> > > (* Walk through the rows of the image *)
> > > While[r < dim[],
> > > =C2 (* Walk through the columns of the image*)
> > > =C2 k = 1;
> > > =C2 While[k < dim[],
> > > =C2  (* Find a white pixel*)
> > > =C2  If[imgfilter[[r, k]] == 1,
> > > =C2  =C2 (* Proceed RegionGrowing and give them a identical value=
by \
> > > multiplying it with n *)
> > > =C2  =C2 region = RegionGrowing[{imgfilter}, {{r, k}}, 1, cost]=
*n;
> > > =C2  =C2 (* Add the identical cell to imageNew *)
> > > =C2  =C2 imageNew = imageNew + region;
> > > =C2  =C2 (* Change n, so each cell has a different value *)
> > > =C2  =C2 n = n + 2;As
> > > =C2  =C2 (* Take the cell out of the original image,
> > > =C2  =C2 so he will stop when there is no white pixel anymore *)
> > > =C2  =C2 imageFilled = imgfilter - region;
> > > =C2  =C2 ];
> > > =C2  k++;
> > > =C2  ];
> > > =C2 r++;
> > > =C2 ];
>
> As Heike asked, what are those functions you use? If the computation
> lasts forever, there must be some bug... Check all braces - correct
> number and position, if all the inputs and outputs have an expected
> format, and so on...- Al=C4=B1nt=C4=B1y=C4=B1 gizle -
>
> - Al=C4=B1nt=C4=B1y=C4=B1 g=C3=B6ster -

Thank you for your answers. But There is a problem too that I don't
know how must I give inform about the region growing function.
Could you possible say me how can I do it?

```

• Prev by Date: Re: FinancialData errors
• Next by Date: Memory leak or flawed garbage collector
• Previous by thread: Re: Code is not working...
• Next by thread: call Fortran subroutine from Mathematica // use NETLink and DLL