Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2010

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

Search the Archive

Re: front end equation formatting

  • To: mathgroup at smc.vnet.net
  • Subject: [mg112508] Re: front end equation formatting
  • From: John Fultz <jfultz at wolfram.com>
  • Date: Sat, 18 Sep 2010 07:23:56 -0400 (EDT)

You want this...

Cell[TextData[{
 "then, ",
 Cell[BoxData[
  FormBox[
   RowBox[{"h", "=", 
    FractionBox["j", "k"]}], TraditionalForm]]]
}], "Text",
 ScriptSizeMultipliers->{1.}]

ScriptSizeMultipliers is fully documented, so you can read more about how it 
works.

Sincerely,

John Fultz
jfultz at wolfram.com
User Interface Group
Wolfram Research, Inc.


On Fri, 17 Sep 2010 06:42:45 -0400 (EDT), Scot T. Martin wrote:
> First Cell[] below shows an equation of equally sized character. Second
> Cell[] makes a smaller font of the terms in the FractionBox[]. Does anyone
> know how to set the formatting so that the font does not get smaller?
> Thank!
>
> Cell[BoxData[
> FormBox[
> RowBox[{"h", "=",
> FractionBox["j", "k"]}], TraditionalForm]], "Input",
> CellChangeTimes->{{3.4936705626324425`*^9, 3.4936705700112553`*^9}}]
>
>
> Cell[TextData[{
> "then, ",
> Cell[BoxData[
> FormBox[
> RowBox[{"h", "=",
> FractionBox["j", "k"]}],
> TraditionalForm]],FormatType->"TraditionalForm"]
> }], "Text",
> CellChangeTimes->{{3.4936705831308784`*^9, 3.4936705899480906`*^9}}]




  • Prev by Date: Re: A little help with sort
  • Next by Date: Re: Need speed partitioning WeatherData
  • Previous by thread: Re: front end equation formatting
  • Next by thread: Range of data with BezierFunction