时间序列MATLAB程序

1、时间序列移动平均法clc,cleary=533.8 574.6 606.9 649.8 705.1 772.0 816.4 892.7 963.9 1015.1 1102.7;m=length(y);n=4,5;%n 为移动平均的项数fori=1:length(n)%由于 n 的取值不同，下面使用了细胞数组forj=1:m-n(i)+1网络yhati(j)=sum(y(j:j+n(i)-1)/n(i);endy12(i)=yhati(end);%提出第 12 月份的预测值s(i)=sqrt(mean(y(n(i)+1:end)-yhati(1:end-1).2);%求预测的标准误差endy12

2、, s%分别显示两种方法的预测值和预测的标准误差指数平滑一次指数平滑程序：clc,clearyt=load('dianqi.txt');%读取 dianqi.txt的数据，n=length(yt);%求 yt的长度alpha=0.2 0.5 0.8;%输入 a 的值m=length(alpha)yhat(1,1:m)=(yt(1)+yt(2)/2;%求第一个预测值索引fori=2:nyhat(i,:)=alpha*yt(i-1)+(1-alpha).*yhat(i-1,:);网络endyhat%求预测值err=sqrt(mean(repmat(yt,1,m)-yhat).2)%

3、求预测的标准误差xlswrite('dianqi.xls',yhat) %把预测数据写到Excel文件，准备在word表格中使用yhat1988=alpha*yt(n)+(1-alpha).*yhat(n,:)%求 1988的预测值二次指数平滑网络程序clc,clearyt=load(剑魔 fadian.txt');%原始发电总量数据以列向量的方式存放在纯文本文件中n=length(yt);alpha=0.3;st1(1)=yt(1);st2(1)=yt(1);fori=2:nst1(i)=alpha*yt(i)+(1-alpha)*st1(i-1);st2(i)=al

4、pha*st1(i)+(1-alpha)*st2(i-1);endxlswrite( 'fadian.xls' ,st1',st2') %把数据写入表单 Sheet1 中的前两列 at=2*st1-st2;bt=alpha/(1-alpha)*(st1-st2);yhat=at+bt;%最后的一个分量为1986 年的预测值xlswrite('fadian.xls',yhat','Sheet1', 'C2' ) %把预测值写入第3 列str= 'C',int2str(n+2);%准备写 198

5、7年预测值位置的字符串xlswrite('fadian.xls',at(n)+2*bt(n),'Sheet1',str) %把 1987年预测值写到相应位置yt=load(剑魔 fadian.txt');%原始发电总量数据以列向量的方式存放在纯文本文件中n=length(yt);alpha=0.3;st1(1)=yt(1);网络st2(1)=yt(1);fori=2:nst1(i)=alpha*yt(i)+(1-alpha)*st1(i-1);st2(i)=alpha*st1(i)+(1-alpha)*st2(i-1);endxlswrite( 'fadian.xls' ,st1',st2') %把数据写入表单 Sheet1 中的前两列 at=2*st1-st2;bt=alpha/(1-alpha)*(st1-st2);yhat=at+bt;%最后的一个分量为1986 年的预测值xlswrite('fadian.xls',yhat','Sheet1', 'C2' ) %把预测值写入第3 列str= 'C',int2str(n+2);%准备写 1987年预测