Re: Combining graphics and tabels in one cell
- To: mathgroup at smc.vnet.net
- Subject: [mg52459] Re: Combining graphics and tabels in one cell
- From: "Steve Luttrell" <steve_usenet at _removemefirst_luttrell.org.uk>
- Date: Sun, 28 Nov 2004 01:06:39 -0500 (EST)
- References: <co97t9$guk$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
You could generate 2 graphics objects then display them side by side using
DisplayTogetherArray.
<<Graphics`Graphics`
<<Graphics`Graphics3D`
m=Table[Random[],{2},{3}]
g1=BarChart3D[m];
g2=Show[Graphics[Text[TableForm[m],{0,0}]]];
DisplayTogetherArray[{g1,g2}];
You will need to resize the final graphic to make sure you can see all of
the table.
Steve Luttrell
"Bruyndonckx P." <pbruynd at vub.ac.be> wrote in message
news:co97t9$guk$1 at smc.vnet.net...
>I have a two-dimensional matrix which I want to display using BarChart3D
>and TableForm. However, I would like
> them to appear side-by-side in one output cell. Is there a way to combine
> a graphical object and a non-graphical
> object in one cell (ie equivalent to GraphicsArray for two graphical
> objects) ?
>
> Peter
>