MathGroup Archive 2012

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

Search the Archive

Re: Subscript on plus expression

  • To: mathgroup at
  • Subject: [mg128717] Re: Subscript on plus expression
  • From: "djmpark" <djmpark at>
  • Date: Mon, 19 Nov 2012 19:18:19 -0500 (EST)
  • Delivered-to:
  • Delivered-to:
  • Delivered-to:
  • Delivered-to:
  • References: <> <19898081.6403.1353229345311.JavaMail.root@m06>

How about this?

MakeBoxes[Subscript[(head : (Plus | Times))[args__], k_], 
  form : (StandardForm | TraditionalForm)] :=
 InterpretationBox[#1, #2] & @@
  {SubscriptBox[RowBox[{"(", ToBoxes[head[args], form], ")"}], 
    ToBoxes[k, form]], Subscript[head[args], k]} 


Subscript[a + b, k] 

Subscript[a x, k] 

David Park
djmpark at 

From: Dave Snead [mailto:dsnead6 at] 


Mathematica fails to parenthesize the a+b in Subscript[Plus[a,b],k]

so the output looks identical to

Is this a bug?
Is there an option to force the parentheses?

Thanks in advance,
Dave Snead

  • Prev by Date: Re: System of second-order nonlinear ordinary differential equations
  • Next by Date: Re: Is there a way to do comment with just one keystroke at the start
  • Previous by thread: Re: Plotting a series of Roots
  • Next by thread: Superscript on plus expression