如何用mathematica计算函数拟合度