Re: List of position-specifying functions
- To: mathgroup at smc.vnet.net
- Subject: [mg102372] Re: [mg102351] List of position-specifying functions
- From: Andrzej Kozlowski <akoz at mimuw.edu.pl>
- Date: Fri, 7 Aug 2009 05:29:46 -0400 (EDT)
- References: <200908061032.GAA01790@smc.vnet.net>
On 6 Aug 2009, at 19:32, Ray Koopman wrote:
> I have a list of distinct positive integers, such as
>
> In[1]:= plist = {2, 5, 4, 6, 3};
>
> I want to convert it to a list of position-specifying functions,
> such as might be used as the second argument in SplitBy or GatherBy.
> One way that works is:
>
> In[2]:= plist /. p_Integer->(#[[p]]&)
>
> Out[2]= { #1[[2]]&, #1[[5]]&, #1[[4]]&, #1[[6]]&, #1[[3]]& }
>
> I've been trying to get the same thing using Map,
> but I haven't been able to do it. Any suggestions?
>
I am not sure if I have understood you correctly but it seems easy:
plist = {2, 5, 4, 6, 3};
Function[n, #1[[n]] & ] /@ plist
{#1[[2]] & , #1[[5]] & , #1[[4]] & , #1[[6]] & , #1[[3]] & }
?
Andrzej Kozlowski
- References:
- List of position-specifying functions
- From: Ray Koopman <koopman@sfu.ca>
- List of position-specifying functions