Re: Border on Tables
- To: mathgroup at smc.vnet.net
- Subject: [mg17072] Re: Border on Tables
- From: Paul Abbott <paul at physics.uwa.edu.au>
- Date: Sat, 17 Apr 1999 03:34:47 -0400
- Organization: University of Western Australia
- References: <7f1ar9$kdo@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Capt Jeff P. Palumbo, pl, x3-7153 wrote:
> Does anyone know how to put borders around all of the output cells from a
> TableForm command?
There is no need to use TableForm. E.g.,
In[1]:= Table[i*j, {i, 10}, {j, 5}]
In[2]:= DisplayForm[StyleBox[GridBox[%, GridFrame -> 2,
RowLines -> True, ColumnLines -> True],
Background -> GrayLevel[0.8]]]
Cheers,
Paul
____________________________________________________________________
Paul Abbott Phone: +61-8-9380-2734
Department of Physics Fax: +61-8-9380-1014
The University of Western Australia
Nedlands WA 6907 mailto:paul at physics.uwa.edu.au
AUSTRALIA http://www.physics.uwa.edu.au/~paul
God IS a weakly left-handed dice player
____________________________________________________________________