Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Can anybody help?

• To: mathgroup at smc.vnet.net
• Subject: [mg63671] Re: Can anybody help?
• From: Peter Pein <petsie at dordos.net>
• Date: Mon, 9 Jan 2006 04:49:14 -0500 (EST)
• References: <dpd7hj$qi2$1@smc.vnet.net> <dpdjn5$5gr$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

Ray Koopman schrieb:
> Kent Holing wrote:
> 
>>I have three vecors containg: v1, v2 and v3.
>>v1 and v2 has the same length. v3 is shorter than v1.
>>All elements of v3 is an element of v1.
>>Need to have the corresponding v2 values corresponding to the v3 (= v1) value.
>>Know that the elements of v1 and v3 are different. The elements of v2 do not need to different.
>>Ex:
>>v1={1,2,3,4,5,6,7,8,9}
>>v2={10,11,12,22,32,42,53,63,73}
>>v3={3,5,8}
>>The corresponding v2 values are {11,32,63}
>>It easy to write straightforward code to do this.
>>But is it really a very elegant/short way (one-liner?) of doing this in Mathematica?
>>Kent Holing
> 
> 
> Pick[v2,MemberQ[v3,#]&/@v1]
> 
The syntax of Pick allows Pick[v2, v1, #] & /@ v3 // Flatten, which I would 
prefer, because it is less nested. But it's a matter of taste.

Peter

• Follow-Ups:
  • Re: Re: Can anybody help?
    • From: Pratik Desai <pdesai1@umbc.edu>