Re: TableForm questions
- To: mathgroup at smc.vnet.net
- Subject: [mg110005] Re: TableForm questions
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Fri, 28 May 2010 07:22:48 -0400 (EDT)
Table[Style[#,
If[Mod[n, 2] == 1,
Directive[Red, Bold],
Plain]] & /@
{n, n^2, n^3}, {n, 5}] // TableForm
Alternatively,
f[x_List] :=
Style[#, Directive[Red, Bold]] & /@ x;
t = Table[{n, n^2, n^3}, {n, 5}];
n = 1;
TableForm[If[Mod[n++, 2] == 1,
f[#], #] & /@ t]
Bob Hanlon
---- Michael Stern <nycstern at gmail.com> wrote:
=============
Using TableForm[], is there any way to format individual lines of a
table to be a different style (such as Bold), or should I punt to Grid[]?
Thanks,
Michael