function - Mathematica：简化函数符号

Question

我有一些带有任意函数的计算。在输出中，Mathematica 始终显示函数参数。我想通过在输出中隐藏参数来稍微整理一下符号。我怎样才能做到这一点？或者更好的是，有没有办法在代码中只写一次函数参数？记住它是一个任意函数。

例如，它是这样的：

f[x,y] + (f[x,y])^2 = ...

我更喜欢这样：

f + f^2 = ...

谢谢！

Answer 1

你的意思是仅仅为了展示目的？可能是一个简单的/.?

Clear[x, y, f]
expr = f[x, y] + (f[x, y])^2 == 34;
expr /. f[__] -> f

给

Out[29]= f + f^2 == 34

您甚至可以修改$PrePrint为自动执行此操作

Clear[x,y,f]
$PrePrint=#/.f[__]->f&;
expr=f[x,y]+(f[x,y])^2==34

Out[6]= f+f^2==34

expr
Out[7]= f+f^2==34

要取回它，请执行

$PrePrint=.
expr

Out[10]= f[x,y]+f[x,y]^2==34

在实际编程中我没有足够的勇气自己做这件事，但它可以尝试。