Mathematica Stack Exchange is a question and answer site for users of Mathematica. Join them; it only takes a minute:

Sign up
Here's how it works:
  1. Anybody can ask a question
  2. Anybody can answer
  3. The best answers are voted up and rise to the top

This question already has an answer here:

Mathematica display complex fractions like this,

enter image description here

the second x look smaller, I want it look like this, how can I get it in Mathematica?

enter image description here

share|improve this question

marked as duplicate by m_goldberg, Mr.Wizard Jul 25 '14 at 7:05

This question has been asked before and already has an answer. If those answers do not fully address your question, please ask a new question.

Use Text instead of TraditionalForm – bill s Jul 25 '14 at 2:41
up vote 1 down vote accepted

Start with

HoldForm[1/(1 + 1/x)] // TraditionalForm

which produces the fraction box in reduced size.


Now open the output cell with Cmnd+Shift+e and add FractionBoxOptions->{AllowScriptLevelChange->False} at the end.

        RowBox[{"1", "+", 
        FractionBox["1", "x"]}]],
      HoldForm], TraditionalForm]], "Output",

Close close the cell with Cmnd+Shift+e and you will see


Note. I think on Windows it is Ctrl+Shift+e

Another way is to use the Option Inspector. Select the output cell and make the following change in the Option Inspector.


share|improve this answer

Just an extended comment to the answer of m_goldberg.

Without changing the standard settings in Option Inspector:

fractionStyle = Style[#, DefaultOptions -> {FractionBoxOptions -> {AllowScriptLevelChange -> False}}] &;
HoldForm[1/(1 + 1/x)] // fractionStyle // TraditionalForm

An additional advantage using DefaultOptions is i.e. having a list of fractions, or any other bigger programming construct, fractionStyle is applied only once at the end (like TraditionalForm).

share|improve this answer

Not the answer you're looking for? Browse other questions tagged or ask your own question.