Math 条件积数学

我试图复制Mathematica中的拉格朗日插值多项式。可以在维基上看到对它们的解释。这是我的代码（对不起，我不知道如何放置mathematica代码，所以我有一个图像）：

---

我的问题是我想要一个条件积。如果j=m，我只想跳过那个产品，评估下一个。这就是为什么我把错误的评估设为1。有什么建议吗？

所有内置函数都以大写字母开头。因此，条件是

If[…]

而不是

If[…]

。修好了，一切都好

With[{k = 5}, Sum[Product[
  If[j != m, (x - x[m])/(x[j] - x[m]), 1], {m, 0, k}], {j, 0, k}]]

---

所有内置函数都以大写字母开头。因此，条件是

If[…]

而不是

If[…]

。修好了，一切都好

With[{k = 5}, Sum[Product[
  If[j != m, (x - x[m])/(x[j] - x[m]), 1], {m, 0, k}], {j, 0, k}]]

---

要将代码放入stackoverflow，请选择所需的代码，然后使用编辑菜单将其复制为“纯文本”。最好只使用普通ascii变量，不使用下标，等等。。。看看我在下面的回答中是如何格式化代码的。@Simon谢谢！我忘记了，要将代码放入stackoverflow，请选择所需的代码，然后使用“编辑”菜单将其复制为“纯文本”。最好只使用普通ascii变量，不使用下标，等等。。。看看我在下面的回答中是如何格式化代码的。@Simon谢谢！我忘了，我只是回来说这个！我不敢相信我犯了这样一个新手错误。我花了20分钟才找到它。不管怎样，谢谢西蒙。@Matthew:就像这种情况有时会发生……我们中的一些人比其他人更容易生气。。。（马修，我不是说你。）我只是回来说这个！我不敢相信我犯了这样一个新手错误。我花了20分钟才找到它。不管怎样，谢谢西蒙。@Matthew:就像这种情况有时会发生……我们中的一些人比其他人更容易生气。。。（马修，我不是说你。）