Re: Manipulating list
- To: mathgroup at smc.vnet.net
- Subject: [mg101521] Re: Manipulating list
- From: Armand Tamzarian <mike.honeychurch at gmail.com>
- Date: Thu, 9 Jul 2009 01:56:54 -0400 (EDT)
- References: <h31utf$c2a$1@smc.vnet.net>
On Jul 8, 6:11 am, kosal lee <leeko... at yahoo.com> wrote:
> Hello Mathematica users
>
> I am new to Mathematica and I have one particular problem I would like you to help me.
> Suppose I have two lists:
>
> list1 = {{A,B,C},{D,E,F},{G,H,I}}
> list2 = {{1,2},{3,4},{5,6}}
>
> I want to have the third elements in each of member list in list1 (that is, C,F,I) to appear in the first position in each member list in list2
>
> that is, i want to have list ={{C,1,2},{F,3,4},{I,5,6}}
>
> Thank you.
> Kosal
MapThread[Flatten[[{#1[[3]],#2}&,{list1,list2}]
is one way.
{list1[[All, 3]], list2[[All, 1]], list2[[All, 2]]} // Transpose
is another
Mike