你是要拟合还是单纯的点线图？如果是拟合，就看看FindFit的帮助。如果是点线图，就试试ListPlot[data]
y=Fit[data,{1,t,t^2,t^3},t]这个是拟合成三次的函数,下面是画图Plot[y,{t,0,1300}]
