永发信息网

灰色预测模型GM(1,n)模型的matlab源代码,包括预测模型的建立,以及模型的精度检验 (主要是精度的检验c,p

答案:2  悬赏:40  手机版
解决时间 2021-03-31 11:09
灰色预测模型GM(1,n)模型的matlab源代码,包括预测模型的建立,以及模型的精度检验 (主要是精度的检验c,p
最佳答案
function GM1_1(X0)
  %format long ;
  [m,n]=size(X0);
  X1=cumsum(X0); %累加
  X2=[];
  for i=1:n-1
  X2(i,:)=X1(i)+X1(i+1);
  end
  B=-0.5.*X2 ;
  t=ones(n-1,1);
  B=[B,t] ; % 求B矩阵
  YN=X0(2:end) ;
  P_t=YN./X1(1:(length(X0)-1)) %对原始数据序列X0进行准光滑性检验,
  %序列x0的光滑比P(t)=X0(t)/X1(t-1)
  A=inv(B.'*B)*B.'*YN.' ;
  a=A(1)
  u=A(2)
  c=u/a ;
  b=X0(1)-c ;
  X=[num2str(b),'exp','(',num2str(-a),'k',')',num2str(c)];
  strcat('X(k+1)=',X)
  %syms k;
  for t=1:length(X0)
  k(1,t)=t-1;
  end
  k
  Y_k_1=b*exp(-a*k)+c;
  for j=1:length(k)-1
  Y(1,j)=Y_k_1(j+1)-Y_k_1(j);
  end
  XY=[Y_k_1(1),Y] %预测值
  CA=abs(XY-X0) ; %残差数列
  Theta=CA %残差检验 绝对误差序列
  XD_Theta= CA ./ X0 %残差检验 相对误差序列
  AV=mean(CA); % 残差数列平均值

  R_k=(min(Theta)+0.5*max(Theta))./(Theta+0.5*max(Theta)) ;% P=0.5
  R=sum(R_k)/length(R_k) %关联度

  Temp0=(CA-AV).^2 ;
  Temp1=sum(Temp0)/length(CA);
  S2=sqrt(Temp1) ; %绝对误差序列的标准差
  %----------
  AV_0=mean(X0); % 原始序列平均值
  Temp_0=(X0-AV_0).^2 ;
  Temp_1=sum(Temp_0)/length(CA);
  S1=sqrt(Temp_1) ; %原始序列的标准差
  TempC=S2/S1*100; %方差比
  C=strcat(num2str(TempC),'%') %后验差检验 %方差比
  %----------
  SS=0.675*S1 ;
  Delta=abs(CA-AV) ;
  TempN=find(Delta<=SS);
  N1=length(TempN);
  N2=length(CA);
  TempP=N1/N2*100;
  P=strcat(num2str(TempP),'%') %后验差检验 %计算小误差概率
全部回答
1
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
单选题假定有两种植物共同生长在一个盆中,当
老师你好还是您好呢,后面加什么符号
我想用乔布斯的头像最广告,这样算侵犯肖像权
济源市济源狄庄居委会我想知道这个在什么地方
求一张八哥犬图片
失职是什么意思
三星手机出那些E系列
剑南在什么地方
背人怎么背?要具体动作要领~~
囧字读言我意思
女人恋爱三年手都没碰过可能吗
贝克曼梁路面弯沉仪可以用皮卡车拉吗
净水设备制水量有多少?
雪花款钻戒的寓意
非常画廊地址有知道的么?有点事想过去!
推荐资讯
车载cd是什么格式
语c有什么墙
小说女主张艳
为什么交通指示牌大部分都是三角型的?
下颌反射和掌颏反射哪个是深层反射
免疫组化实验和elisa实验有什么区别?
世界上面积最大的陆地是A.亚欧大陆B.非洲大陆
(6+×)X40=(6一x)X20
什么叫佛仙缘都占 算事的说我.
378分考研有希望
汪涵儿子最新照片
为什么我的芝麻分664分,花呗额度才1000一直
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?