MathGroup Archive 2012

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

Search the Archive

Re: Print TraditionalForm

  • To: mathgroup at smc.vnet.net
  • Subject: [mg126664] Re: Print TraditionalForm
  • From: Themis Matsoukas <tmatsoukas at me.com>
  • Date: Wed, 30 May 2012 04:07:58 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com

This does not give me exactly what I want because it produces output in italics, not in TraditionalForm and does not work with integrals or other math. However, I looked a bit further into ExpressionCell and came up with the following that works nicely:

t = (Subscript[c, v1] Subscript[n, 1] Subscript[T, 1] + 
     Subscript[c, v2] Subscript[n, 2] Subscript[T, 2])/(Subscript[c, 
       v1] Subscript[n, 1] + Subscript[c, v2] Subscript[n, 2]);

CellPrint[
 TextCell[Row[{"The equation ", 
    ExpressionCell[T == t] // TraditionalForm, 
    " is used to calculate blah blah blah."}], "Text"]]

Thanks!



  • Prev by Date: Parallelize and Array access
  • Next by Date: I can not find all the contexts through the command "Contexts[]".
  • Previous by thread: Re: Print TraditionalForm
  • Next by thread: GraphPath With Edge Weights