Wolfram mathematica 迫使mathematica显示-1+；a作为a-1

我刚刚开始学习数学中的模式。我想知道强制mma将

-1+a

显示为

a-1

的不同方式。非常感谢

最简单的方法可能是

-1+a//TraditionalForm

你可能会使用这样的黑客

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

---

但是（正如花环所建议的那样）如果你想让它看起来更像人类会写的东西，最好使用默认的Mathematica表达式排序并使用

传统形式

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

Out[34]=a-1

（
PolynomialForm
据我所知是没有文档的。我正在使用Mma 7。）
@belisarius:你对这个线程有什么意见吗？非常感谢
PolynomialForm[-1 + a, TraditionalOrder -> True]