arr=[0;6;8.3;9.8;13;15;13.5;26.1;80.3;86;102.6];
[m,n]=size(arr); %m,n分别为行数列数
s=zero(m,2);
alf=0.2; %平滑系数0.2
for j=1:2
s(1,j)=arr(1,1); %初始化,使S1,S2为第一年的数据,S1为一次平滑预测结果,S2为二次平滑预测结果
end
for i=2:m
for j=1:2
if(j==1)
s(i,j)=alf*arr(i,1)+(1-alf)*s(i-1,1);
else
s(i,j)=alf*s(i,1)+(1-alf)*s(i-1,2);
end
end
end