MathGroup Archive 2013

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Changing a list with the information of other

  • To: mathgroup at smc.vnet.net
  • Subject: [mg131395] Re: Changing a list with the information of other
  • From: Tomas Garza <tgarza10 at msn.com>
  • Date: Wed, 3 Jul 2013 04:58:06 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-outx@smc.vnet.net
  • Delivered-to: mathgroup-newsendx@smc.vnet.net
  • References: <20130702044642.9CA146A4F@smc.vnet.net>

A possible approach, using the power of functional programming, is
In[1]:= listone={{0,1},{1,w},{2,1+w},{3,1+2 w},{4,2},{5,2 w},{6,2+2 w},{7,2+w}}Out[1]= {{0,1},{1,w},{2,1+w},{3,1+2 w},{4,2},{5,2 w},{6,2+2 w},{7,2+w}}
In[2]:= listtwo={1,1+w,2+w,2 w,2,2+2 w,1+2 w,w}Out[2]= {1,1+w,2+w,2 w,2,2+2 w,1+2 w,w}
In[3]:= listthree=Transpose[listone][[2]]Out[3]= {1,w,1+w,1+2 w,2,2 w,2+2 w,2+w}
In[4]:= pos=Flatten[Position[listthree,#,{1}]&/@listtwo]Out[4]= {1,3,8,6,5,7,4,2}
In[5]:= listone[[pos[[#]]]][[1]]&/@Range[Length[pos]]Out[5]= {0,2,7,5,4,6,3,1}
-Tomas

> From: jen at fct.unl.pt
> Subject: Changing a list with the information of other
> To: mathgroup at smc.vnet.net
> Date: Tue, 2 Jul 2013 00:46:42 -0400
>
> Good morning
>
> I have the following (possibly very simple) problem.
> I have a list, created using a Table
>
> {{0, 1}, {1, w}, {2, 1 + w}, {3, 1 + 2 w}, {4, 2}, {5, 2 w}, {6, 2 + 2 w}, {7, 2 + w}}.
>
> Then, using another Table, I created the list
>
> {1, 1 + w, 2 + w, 2 w, 2, 2 + 2 w, 1 + 2 w, w}
>
> Note that all these elements appear always in second place, in the ordered pairs of the first list. What I want is an instruction that allows to replace all these elements by the ones that appear first in the ordered pairs above. That is, I would like to replace this list by the new one
>
> {0, 2, 7, 5, 4, 6, 3, 1}.
>
> As you may guess this is only of interest when the lists are very big (with thousands of elements).
>
> Thank you
>
 		 	   		  


  • Prev by Date: Re: Changing a list with the information of other
  • Next by Date: radial intensity
  • Previous by thread: Re: Changing a list with the information of other
  • Next by thread: Re: Changing a list with the information of other