Re: List manipulation
- To: mathgroup at smc.vnet.net
- Subject: [mg73287] Re: [mg73248] List manipulation
- From: Adriano Pascoletti <pascolet at dimi.uniud.it>
- Date: Fri, 9 Feb 2007 02:31:30 -0500 (EST)
In[1]:=
liste = {{a1, a2, a3}, {b1, b2, b3}, {c1, c2, c3},
{d1, d2, d3}};
f[Sequence @@ #, e] & /@ liste
Out[2]=
{f[a1, a2, a3, e], f[b1, b2, b3, e], f[c1, c2, c3, e], f[d1, d2, d3, e]}
or
In[4]:=
(f[Join[#1, {e}]] & ) /@ liste
Out[4]=
{f[{a1, a2, a3, e}], f[{b1, b2, b3, e}],
f[{c1, c2, c3, e}], f[{d1, d2, d3, e}]}
Adriano Pascoletti
On 8 feb 2007, at 09:48, sepp wrote:
> hello,
> I would like to combine list elements in the following way:
>
> I have a list with
> liste={{a1,a2,a3},{b1,b2,b3},{c1,c2,c3},.....}
> and a single element {e}
>
>
> I would to add the element {e} to each sublist to get something like
> liste_new={ {a1,a2,a3,e},{b1,b2,b3,e},{c1,c2,c3,e},.....}
> so that finally I can apply a function f on the list
> liste_manipulated={f[ {a1,a2,a3,e}],f[{b1,b2,b3,e}],f
> [{c1,c2,c3,e}],.....}
>
> I had a look at thread, mapthread, inner, outer, but nothing really
> seems to fit...
> thank you in advance for useful comments!
>
>