这两天又是哪个学校要交作业了啊：
Clear[f]f[x_] = x^2.5;SystemOpen@Export["a.xls", Table[{i, f[i]}, {i, 0, 15}]]
你应该知道要改哪。
顺便，如果你也是准备把这些数据搞到Origin里去的人，那么我还是要说一句，Origin的画图跟Mathematica比没有什么优势，此外，就算你是要怎么做，也该把数据导出为TXT，而非Excel。
