Re: color points in TableForm
- To: mathgroup at smc.vnet.net
- Subject: [mg63067] Re: color points in TableForm
- From: bghiggins at ucdavis.edu
- Date: Tue, 13 Dec 2005 03:40:49 -0500 (EST)
- References: <dnedq7$180$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Cliff,
You could try this:
funnylist = {2001, 2002, 2003, 2004}
colrsquar = {10, 20, 30, 40}
dataIndex = Table[StyleForm[\[FilledCicle], FontColor ->
Hue[0.15*i]], {i, Length[funnylist]}]
yearvsrsquarreg = TableForm[Transpose[{funnylist, colrsquar,
dataIndex}], \
TableHeadings -> {None, {"Year", "R Squared", "data"}}]
Cheers,
Brian