如何在MuPad中轻松比较两个多项式的系数

Question

如何在MuPad中轻松比较两个多项式的系数？

Answer 1

这是我的解决方案，它定义了运算符，例如= s ^ 1 =;该运算符比较s ^ 1系数。代码应该很容易修改。

eqcoeff := (x, i, a, b) -> coeff(a, x, i) = coeff(b, x, i):
for n from 0 to 6 do
    operator("=s^" . n . "=", fp::curry(eqcoeff, 3)(s)(n), Binary, 1):
end:

// for example:
4*s+3 =s^0= 4*s+7; // 3=7
4*s+3 =s^1= 4*s+7; // 4=4