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!