关于Mathematica软件的命令使用的讨论

wayne

即先分解因式(FactorList),对每一个因子计算其最高次幂,再统计一下,
代码如下:

1. Total[Table[
   
2.   Total[First@
   
3.      CoefficientRules[i[[1]], {x, y}, "DegreeLexicographic"][[All,
   
4.        1]]]*i[[2]], {i, Rest@FactorList[eqs]}]]

复制代码