Re: Re: expression formatting inside tables

*To*: mathgroup at smc.vnet.net*Subject*: [mg54638] Re: [mg54610] Re: [mg54591] expression formatting inside tables*From*: "Owen, HL \(Hywel\)" <h.l.owen at dl.ac.uk>*Date*: Fri, 25 Feb 2005 01:18:37 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

HoldAll turns off all the evaluation, not just the argument. You could just do it by brute force: Table[{ToString[foo] <> "[" <> ToString[i] <> "]", foo[i]}, {i, 5}] // TableForm which lets you use # instead of foo if you want to use this kind of expression in other situations. It ain't pretty, but it works. Hywel > -----Original Message----- > From: Christoph Lhotka [mailto:lhotka at astro.univie.ac.at] To: mathgroup at smc.vnet.net > Sent: 24 February 2005 08:21 > To: mathgroup at smc.vnet.net > Subject: [mg54638] [mg54610] Re: [mg54591] expression formatting inside tables > > > On Wed, 23 Feb 2005 03:12:53 -0500 (EST) > "Trevor Baca" <trevorbaca at gmail.com> wrote: > > hi mathgroup folks, > > > > let > > > > foo[x_] := x^2 > > > > then how to easily tableize the following? > > > > foo[1] 1 > > foo[2] 4 > > foo[3] 9 > > foo[4] 16 > > foo[5] 25 > > > > because neither > > > > Table[{HoldForm[foo[i]], foo[i]}, {i, 5}] // TableForm > > > > nor > > > > Table[{foo[HoldForm[i]], foo[i]}, {i, 5}] // TableForm > > > > did what i was expecting. > > > > trevor > > > > Hi, I think, this is the easiest way, if you need such output: > > In[..]:= Table[{"foo"[x], foo[x]}, {x, 1, 5}] // TableForm > Out[..]/TableForm:= > foo[1] 1 > foo[2] 4 > foo[3] 9 > foo[4] 16 > foo[5] 25 > > But be sure, that this is something like a trick, because > "foo"[x] and foo[x] > are two different things... > > In[..]:=FullForm[%] > Out[..]:=List[List["foo"[1], 1], List["foo"[2], 4], > List["foo"[3], 9], > List["foo"[4], 16], List["foo"[5], 25]] > > -- Christoph Lhotka -- > University of Vienna > Institute for Astronomy > Tuerkenschanzstr. 17 > 1180 Vienna, Austria > fon. +43.1.4277.518.41 > mail. lhotka at astro.univie.ac.at > > >