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

MathGroup Archive 2012

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

Search the Archive

Re: Subscript on plus expression

  • To: mathgroup at smc.vnet.net
  • Subject: [mg128704] Re: Subscript on plus expression
  • From: Bob Hanlon <hanlonr357 at gmail.com>
  • Date: Sun, 18 Nov 2012 17:16:01 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-newout@smc.vnet.net
  • Delivered-to: mathgroup-newsend@smc.vnet.net
  • References: <20121117084935.868E56AF3@smc.vnet.net>

Format[Subscript[arg_Plus, k_]] :=
 Subscript["(" <> StringJoin @@
    Riffle[ToString /@ (List @@ arg),
     " + "] <> ")", k]

Subscript[a + b + 2, k]


Bob Hanlon


On Sun, Nov 18, 2012 at 3:57 AM, Dave Snead <dsnead6 at charter.net> wrote:
> Hi,
>
> Mathematica fails to parenthesize the a+b in
> Subscript[Plus[a,b],k]
>
> so the output looks identical to
> Plus[a,Subscript[b,k]]
>
> Is this a bug?
> Is there an option to force the parentheses?
>
> Thanks in advance,
> Dave Snead
>
>
>



  • Prev by Date: Re: correlation function
  • Next by Date: Re: Subscript on plus expression
  • Previous by thread: Re: Subscript on plus expression
  • Next by thread: Re: Plotting a series of Roots