Re: Table as Graphics Object?

*To*: mathgroup at smc.vnet.net*Subject*: [mg35070] Re: [mg35027] Table as Graphics Object?*From*: BobHanlon at aol.com*Date*: Thu, 20 Jun 2002 23:56:55 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

In a message dated 6/20/02 3:20:18 AM, siegman at stanford.edu writes: >I'd like to include a Table as one of the objects in a >GraphicsArray, using a simple syntax like > > myTable = Table[---] // TableForm > > myPlot = Plot[---] > > Show[ GraphicsArray[ {{myTable, myPlot}} ] > >I know I could built a "psuedo Table" into a Graphics object using >the usual Text[---] commands, but at the cost of a lot of work to >input and position the various lines. > >Any other approaches? > tbl = TableForm[Table[Binomial[i,j],{i,0,8},{j,0,i}]]; plt = Plot[x*(1-x), {x,0,1}, DisplayFunction->Identity]; Show[GraphicsArray[ {{Graphics[Text[tbl,{0,0}]]}, {plt}}], DisplayFunction->$DisplayFunction, ImageSize->400]; Bob Hanlon Chantilly, VA USA