Services & ResourcesWolfram ForumsMathGroup Archive

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

Print TraditionalForm

• To: mathgroup at smc.vnet.net
• Subject: [mg126641] Print TraditionalForm
• From: Themis Matsoukas <tmatsoukas at me.com>
• Date: Mon, 28 May 2012 05:10:18 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com

I want to typeset a math equation that is is printed in TraditionalForm. Here is an example:

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]);

Print["T" // TraditionalForm, " = ", t]

The Print statement gives me the equation I want but in Courier font, which is default for Print. If I select the output cell and use the notebook interface to Convert to TraditionalForm, then the equation is printed in the default font for text, which is really how I want it. Is it possible to obtain the final result using only Mathematica expressions, without having to go through the notebook interface?

• Follow-Ups:
  • Re: Print TraditionalForm
    • From: Bob Hanlon <hanlonr357@gmail.com>