灰色预测matlab程序

clc %清屏，以使结果独立显示
format long; %设置计算精度
x=[ 5,3,1,2,3,2,1,0,2.5,0,2,2.5,2.5]; %数据
if length(x(:,1))==1 %对输入矩阵进行判断，如不是一维列矩阵，进行转置变换
x=x';
endn=length(x); %取输入数据的样本量
z=0;
for i=1:n %计算累加值，并将值赋予矩阵 be
z=z+x(i,:);
be(i,:)=z;
end
for i=2:n %对原始数列平行移位
y(i-1,:)=x(i,:);
end
for i=1:n-1 %计算数据矩阵B的第一列数据
c(i,:)=-0.5*(be(i,:)+be(i+1,:));
end
for j=1:n-1 %计算数据矩阵B的第二列数据
e(j,:)=1;
end
for i=1:n-1 %构造数据矩阵B
B(i,1)=c(i,:);
B(i,2)=e(i,:);
end
alpha=inv(B'*B)*B'*y; %计算参数 矩阵
for i=1:n+1 %计算数据估计值的累加数列，如改为n+1为n+m可预测后m-1个值
ago(i,:)=(x(1,:)-alpha(2,:)/alpha(1,:))*exp(-alpha(1,:)*(i-1))+alpha(2,:)/alpha(1,:);
end
var(1,:)=ago(1,:)
for i=1:n+4%如改n为n+m-1，可预测后m-1个值
var(i+1,