有什么方法可以强制mathematica将-1 + a显示为a-1

Question

我刚开始使用mathematica中的模式。我想知道强制mma将-1+a显示为a-1的不同方法。非常感谢！

Answer 1

最简单的方法可能是-1 + a // TraditionalForm。

Answer 2

一个归功于Jean-Marc Gulliet（MathGroup）

（您可能也对Jens-Peer Kuska对此post的回复感兴趣）

PolynomialForm[-1 + a, TraditionalOrder -> True]

输出[34] = a-1

（据我所知，PolynomialForm没有记录。我使用的是Mma 7.）

Answer 3

你可能会使用像这样的黑客

$PrePrint = (# /. -1 + expr__ :> Interpretation[Row[{expr, -1}], expr - 1]) &

但是（正如WReach建议的那样）最好使用默认的Mathematica表达式排序，并在你希望它看起来更像人类会写的时候使用TraditionalForm。