Re: Short, simple - Why doesn't it work as a function
- To: mathgroup at smc.vnet.net
- Subject: [mg71790] Re: Short, simple - Why doesn't it work as a function
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Wed, 29 Nov 2006 02:56:32 -0500 (EST)
- Organization: The Open University, Milton Keynes, UK
- References: <ekh7e4$sd0$1@smc.vnet.net>
wooks wrote:
> {#, a} & /@ {a, b, c}
>
> gives {{a, a}, {b, a}, {c, a}} which is what i want.
>
> why[x_List] := {#, a} & /@ x;
> why[{a, b, c}]
>
> gives.
>
> {{a, a}, {{b, a}, {{c, a}, {}}}}
>
> not what I want.
>
> I've checked the FullForms and they are different - why??
>
Works fine on my system. I would advise to try again with a fresh kernel.
In[1]:=
({#1, a} & ) /@ {a, b, c}
Out[1]=
{{a, a}, {b, a}, {c, a}}
In[2]:=
FullForm[%]
Out[2]//FullForm=
FullForm[{{a, a}, {b, a}, {c, a}}]
In[3]:=
why[x_List] := ({#1, a} & ) /@ x;
why[{a, b, c}]
Out[4]=
{{a, a}, {b, a}, {c, a}}
In[5]:=
FullForm[%]
Out[5]//FullForm=
FullForm[{{a, a}, {b, a}, {c, a}}]
Regards,
Jean-Marc