mathematica里面对一个函数进行傅里叶变换