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

我自己在实际编程中没有勇气自己这样做，但可以尝试。