Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

Re: Text in Tables

  • To: mathgroup at smc.vnet.net
  • Subject: [mg50783] Re: Text in Tables
  • From: Paul Abbott <paul at physics.uwa.edu.au>
  • Date: Tue, 21 Sep 2004 03:48:56 -0400 (EDT)
  • Organization: The University of Western Australia
  • References: <ci9ba5$i5j$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

In article <ci9ba5$i5j$1 at smc.vnet.net>, Ron Smith <rcmmma at yahoo.com.au> 
wrote:

> Any input into a table cell is done in
> TraditionalForm. This is fine if the cell contains
> mathematical notation but if you want to just input
> some text the result is a lot of unnecessary gunk in
> the underlying cell expression. 
> 
> (E.g. "some text" appears as RowBox[{"some", " ",
> "text"}] )
> 
> You can manually edit this underlying expression to
> ensure that it is just text that appears in the cell
> of the GridBox expression but this gets cumberson with
> large tables. Can you enter text directly into a Table
> that doesn't result in an underlying expression that
> uses RowBoxes?

I'm not sure exactly what you want to achieve here. Can you post an 
example of the type of cell you want to produce.

To enter an inline (TraditionalForm) equations in a table you use 
\[ControlKey]9. One little known tip is that this operation is a toggle. 
So if you enter it twice you will get (plain) text inside Cells in the 
table fields. For example, compare (in a StyleSheet such as 
ArticleClassic that has the "NumberedTable" style)

   Cell[TextData[Cell[BoxData[    
      FormBox[GridBox[{{
         RowBox[{"some", " ", "text"}], 
         "more",             
         RowBox[{"and", " ", "even", " ", "more"}]
      }}], TraditionalForm]]]], 
   "NumberedTable"]

with

   Cell[TextData[Cell[BoxData[    
      FormBox[GridBox[{{
         Cell["some text"], 
         Cell["more"], 
         Cell["and even more"]} 
      }], TraditionalForm]]]], 
   "NumberedTable"]

Cheers,
Paul

-- 
Paul Abbott                                   Phone: +61 8 9380 2734
School of Physics, M013                         Fax: +61 8 9380 1014
The University of Western Australia      (CRICOS Provider No 00126G)         
35 Stirling Highway
Crawley WA 6009                      mailto:paul at physics.uwa.edu.au 
AUSTRALIA                            http://physics.uwa.edu.au/~paul


  • Prev by Date: Ordering of Eigensystem results
  • Next by Date: Re: Re: How to simplify to a result that is real
  • Previous by thread: Text in Tables
  • Next by thread: GuiKit & GraphEdit