条件产品mathematica

Question

我试图在Mathematica中复制拉格朗日插值多项式。可以看到用于解释它们的维基here。这是我的代码（对不起，我不知道如何将mathematica代码放在SO中，所以我有一个图像）： 我的问题是我想要一个有条件的产品。如果j = m我只想跳过该产品并评估下一个产品。这就是为什么我把错误的评价作为1.任何建议？

Answer 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}]]