Re: Transform list of numbers into pure functions using replace rule
- To: mathgroup at smc.vnet.net
- Subject: [mg89491] Re: Transform list of numbers into pure functions using replace rule
- From: Steven Siew <stevensiew2 at gmail.com>
- Date: Wed, 11 Jun 2008 03:15:28 -0400 (EDT)
- References: <g2lb8t$964$1@smc.vnet.net>
Er?
What about this?
If[NumberQ[#],ToExpression[ToString[#]<>"&"],#] & /@ {1,2,3&,f[x]}
FullForm[%]
{1,2,f[x]} /. x_ /; NumberQ[x] -> Function[x]
FullForm[%]
Steven Siew