MathGroup Archive 2003

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: presentation layout

  • To: mathgroup at smc.vnet.net
  • Subject: [mg39917] Re: [mg39826] presentation layout
  • From: Omega Consulting <info at omegaconsultinggroup.com>
  • Date: Tue, 11 Mar 2003 02:38:53 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

At 01:48 AM 3/8/2003, Beleznay, Akos wrote:

>Hi,
>
>I am working on a presentation.  What is the best way to arrange graphs,
>tables and text (like in PowerPoint)?
>
>  E.g.:
>================
>Title
>----------------
>|       | text |
>| graph |-------
>|       | table|
>----------------
>================
>
>thanks for your help,
>
>-akos

Some judicious use of GridBoxes will do the trick.

text = "Some text.";
table={{1,2,3},{4,5,6},{7,8,9}};
graph=Plot[Sin[x],{x,0,2Pi}];

cell=Cell[GraphicsData["PostScript", DisplayString[graph]]];

CellPrint[Cell[BoxData[
       GridBox[{{cell,
             GridBox[{{text},{GridBox[table]}},RowsEqual->True,
               RowLines->True, RowSpacings->10]}},
         RowAlignments->Center, ColumnLines->True,
         GridFrame->True]
       ],"Text"]]

--------------------------------------------------------------
Omega Consulting
"The final answer to your Mathematica needs"
http://omegaconsultinggroup.com



  • Prev by Date: Re: Help with Format Background Color Cell Gray Box
  • Next by Date: Re: Mathlink problem with number format
  • Previous by thread: Re: presentation layout
  • Next by thread: Re: Re: presentation layout