# An issue with formulas typesetting in Grid & Column

I tried to construct a small sheet with text and equations presented in a convenient publishing form, using Column:

Column[{
Row[{"An integral:"}],
Row[{Integrate[f[x], x]}]


But every time the integral sign appears in one of expressions inside the Column, Mathematica reduces its size in the output. In this particular case the output looks like

Without the Column (or Grid, which seems to have the same effect) wrapper, the integral sign looks convenient:

Row[{Integrate[f[x], x]}] // TraditionalForm


I tried to add Pane wrapper to the Column contents, and played with ItemSize option too, with no effect. Actually, I can't even figure out what exactly happens within the Column (or Grid) function that reduces the \[Integral] size.

So, the question is: what causes the shrinking in Column and Grid, and is there a way to control it?

I was thinking of using GraphicsGrid instead, but it seems look more like a hack than a proper solution—if it would help at all.

Notes:

1. You can notice the same effect in a Standard Form too, it is just more clear in the Traditional output.
2. I'm using Mathematica 8 on Windows 7 Basic.
-

It would appear that Column by default is setting the integral in the InlineFormula style. If you force it to use the DisplayFormula style, the integral will be set larger.

Column[{Row[{"An integral:"}],


-
Ah, I missed the intent of the question. Nice solution. – Jagra Feb 13 '13 at 15:26
Yes, that does it! Thanks. Mathematica 8 Documentation Center is almost silent when it comes to keywords InlineFormula and DisplayFormula. :-\ – Akater Feb 13 '13 at 15:28
Clarification, Do the uses of Row[] and TraditionalForm do anything in this? Just wondering. – Jagra Feb 13 '13 at 15:30
No, they don't matter. But I think that leaving Rows in the example makes sense because I could use some inline formulas in the sheet, and they'd look OK, while the standalone formulae and calculations need the DisplayFormula option, and it's only needed in the corresponding Rows. – Akater Feb 13 '13 at 15:36
@Jagra. TraditionalForm is innocent -- Row is under suspicion. – m_goldberg Feb 13 '13 at 15:37

This should do it:

Column[{"An integral:", TextCell[TraditionalForm[Integrate[f[x], x]], FontSize -> 24]}]


A slight variation, this works too:

Column[{"An integral:", TraditionalForm[Integrate[f[x], x]]},
ItemStyle -> {2 -> FontSize -> 24}]


Isolating the individual pieces often helps in controlling different kinds of formatting.

-
I see this i.stack.imgur.com/H27aQ.png – belisarius has settled Feb 13 '13 at 13:23
@belisarius -- That looks odd. I probably have an artifact, like f[] previously defined. I'll correct and update. Ah, that does it. Thx – Jagra Feb 13 '13 at 14:17
Sorry if I wasn't clear enough in my post, but it's not the formula size that bothers me, it's just the integral symbol size: \[Integral], or “∫”. I could just write Style[Integrate[f[x], x], FontSize -> 24] instead of Integrate[f[x], x] in the original code, and get the larger sized formula. But I have to write something like Row[{DisplayForm@ AdjustmentBox[Style["\[Integral]", Large], BoxBaselineShift -> 1/2], f[x], "\[ThinSpace]", Dt[x]}] (aligning manually on the box level) to get the result closer to my 2nd pic of (sole) integral which is what I expect to see in the sheet. – Akater Feb 13 '13 at 15:18