二次指数平滑法预测

clc,clear ；//清空命令行，工作区
load pre1.txt %原始数据以列向量的方式存放在纯文本文件中
yt=pre1; n=length(yt); 
alpha=0.3; st1(1)=yt(1); st2(1)=yt(1); 
for i=2:n 
 st1(i)=alpha*yt(i)+(1-alpha)*st1(i-1); 
 st2(i)=alpha*st1(i)+(1-alpha)*st2(i-1); 
end 
xlswrite('pre1.xls',[st1',st2']) //矩阵写入文件
a=2*st1-st2 
b=alpha/(1-alpha)*(st1-st2) 
yhat=a+b; //y一尖（预测y）=a+b;
xlswrite('pre1.xls',yhat','Sheet1','C2') 
str=char(['C',int2str(n+2)]); 
xlswrite('pre1.xls',a(n)+2*b(n),'Sheet1',str);