Mathematica 协助：使用 /。将方法替换为 IF[] 条件

首先我要声明，我是一名 Mathematica 新手，这个问题可能很容易回答，但到目前为止，我在互联网上找不到任何针对这个特定问题的帮助。在这里，我基本上总结了我需要我的代码做什么。使用时出现一些问题/.将命令替换为IF条件语句。基本上，我有一个很长的函数，其中包含另一个由全局定义的函数IF有条件的。这几行代码演示了我遇到的错误......

In[1]:= y[x_, z_] = 2*x + 3*z;

In[2]:= zz[x_, z_] := If[y[x, z] < 0, 4*y[x, z], y[x, z]]

In[3]:= zz[-1, -2]

Out[3]= -32

但是我需要...

In[4]:= zz[x_, z_] /. x -> -1 /. z -> -2

Out[4]= If[3 Pattern[-2, _] + 2 Pattern[-1, _] < 0, 
 4 y[Pattern[-1, _], Pattern[-2, _]], 
 y[Pattern[-1, _], Pattern[-2, _]]]

这不会产生预期的数字项。预先感谢大家的帮助，尽管这个问题听起来很愚蠢。注意：我必须使用替换命令，而不是直接赋值x and z.

附录：

我过于简化了我的例子。举个例子：

In[91]:= a[b_, c_] = -3*b + 2*c + d + e + f;

In[92]:= g[b_, c_] := If[a[b, c] < 0, -3*a[b, c], a[b, c]];

In[10]:= g[2, 4] /. d -> 1 /. e -> 2 /. f -> 3

Out[10]= 2 + d + e + f

但我希望看到结果Out[10]= 8

希望另一个简单的修复。

当你定义一个函数时，你使用x_，它告诉mathematica找到名为的模式x并将定义应用到它上面。所以f[x_]=x^2 says “采用表达式 x 并将其变换为 Power[x,2]".

当您调用函数时，您不再使用模式，而是使用 mathematica 最终替换的变量或值x. So f[a]会给你a^2 if a未定义，或使用定义a并给出相应的结果。

正如霍华德在评论中提到的，如果您只需删除下划线，您就会得到您想要的表达式。

In[1]:= zz[x, z] /. x -> -1 /. z -> -2

Out[1]= -32

EDIT

为了回答您的评论，

If仅在评估条件后评估第二个和第三个参数。所以如果你看g[2,4]， 你得到

If[2 + d + e + f < 0, -3 a[2, 4], a[2, 4]]

你会看到“then”和“else”语句仍然没有被评估，尽管a[2,4]其本身给你2 + d + e + f.

所以，当你进行替换时，mathematica 开始替换d,e,f无论它在表达式中找到什么（仅在条件中），并且一旦它计算条件并到达“then”或“else”步骤，就没有其他内容可以替换。

你需要使用的是ReplaceAll or //.它会重复应用规则，直到不再适用为止。就是这样

In[2]:= rules = {d -> 1, e -> 2, f -> 3};
        g[2, 4] //. rules
Out[2]= 8