用Mathematica做函数计算