Re: help to find position location

• To: mathgroup at smc.vnet.net
• Subject: [mg86656] Re: help to find position location
• From: "Dana DeLouis" <dana.del at gmail.com>
• Date: Sun, 16 Mar 2008 04:40:16 -0500 (EST)

```> I'm stuck to find the position of (the Max value in ) each row.

Hi.  Couple of ways.  Here are two.

m = {
{82, 71, 62, 47},
{52, 96, 31, 36},
{94, 52, 86, 12}
};

Flatten[Map[Position[#1, Max[#1]] &, m]]

{1, 2, 1}

(* or *)

Flatten[Map[Ordering[#1, -1] & , m]]

{1, 2, 1}

--
HTH   :>)
Dana DeLouis
Mathematica 6, but reading 5.2 Help files

"haitomi" <tpnycity at yahoo.com> wrote in message
news:frclmj\$rjp\$1 at smc.vnet.net...
> Hello All,
>
>
>
> t = Table[RandomInteger[{30, 99}], {i, 1, 3}, {j, 1, 4}]
>
> max = Map[Max, t]
>
> pos=Position[.........]
>
> I stuck to find the position of each row.
> Example, if I run the table above they will generate for the following 3 X
4 matrix
> {
> {82, 71, 62, 47},
> {52, 96, 31, 36},
> {94, 52, 86, 12},
>
> }
>
> and the the result of position I need will be
>
> {1,2,1}
>
> Anyone can help me.......
>
> Thank you all,
>
> Tomi
>

```

• Prev by Date: Re: Re: Pi is not a real number?
• Next by Date: RE: Intermediate Evaluation in FindMinimum
• Previous by thread: help to find position location
• Next by thread: Using SampleDepth and SampleRate for SoundNote data?