Typesetting help

Question

I have a rather simple question that has me flummoxed.

Let's say I have two matrices:

m1 = {{a1, a2}, {b1, b2}};
m2 = {{u1, v1}, {u2, v2}};

I am looking to typeset m1 ± m2 similar to:

Text@TableForm[m1 + "\[PlusMinus]" m2 ]

Works for the most part, but I want to remove the + sign from the output
I also want to control the text sizes for the m1 and m2 independently so that the a1, a2 etc appear in a larger text and u1, v1 appear in a smaller text

I tried:

Text@TableForm[m1 + "\[PlusMinus]" m2 ] /. "+" -> "x"

But that does not seem to work. Help much appreciated.

Something like Text@TableForm@MapThread[PlusMinus, {{m1}, {m2}}, 3]? — akater, Commented May 27, 2014 at 5:34
That works... I need a little more flexibility... in terms of text size for matrices... I'll add color to the Question. — Pam, Commented May 27, 2014 at 5:47

Community · Accepted Answer · 2020-06-16 09:23:30Z

2

Grid[
 MapThread[PlusMinus, {m1, m2}, 2],
 BaseStyle -> 15, 
 ItemStyle -> {{Red, Blue}, {}, {1, 1} -> {18, Bold}}]

DisplayForm@RowBox[{"(", #, ")"}] & [%]

m1 = Map[Style[#, 18, Bold] &, {{a1, a2}, {b1, b2}}, {2}];
m2 = {{u1, v1}, {u2, v2}};

Grid@MapThread[PlusMinus, {m1, m2}, 2]

CommunityBot

1

answered May 27, 2014 at 6:10

Kuba

138k13 gold badges289 silver badges751 bronze badges

$\begingroup$ Sorry if I wasn't clear. I wanted to typeset it such that a1, a2 b1,b2 are in large type and u1, U2, v1,v2 are in small type $\endgroup$
– Pam
Commented May 27, 2014 at 10:19
$\begingroup$ @Pam Be careful next time :) is this ok? :) $\endgroup$
– Kuba
Commented May 27, 2014 at 10:30
$\begingroup$ Wonderful... Thanks Kuba! $\endgroup$
– Pam
Commented May 27, 2014 at 10:42

Add a comment |

1 Answer 1