Question

已知一组数据，如何用mathematica模拟函数，并画图

Answer 1

你是要拟合还是单纯的点线图？如果是拟合，就看看FindFit的帮助。如果是点线图，就试试

ListPlot[data]

追问

拟合怎么写代码

追答

所以说，好好看看自带帮助……里面写的很详细了……写下FindFit再按F1就行了……看你这标题栏你用的也是版本8还是9的中文版，那不看帮助也太浪费了。反正拟合就那么四个指令：Fit，FindFit，LinearModelFit，NonLinearModelFit，你这个只贴了张图我也没法试，但看情形FindFit足够了。

Answer 2

y=Fit[data,{1,t,t^2,t^3},t]
这个是拟合成三次的函数,下面是画图
Plot[y,{t,0,1300}]