时间序列分析实验报告

  • 格式:doc
  • 大小:68.00 KB
  • 文档页数:9

下载文档原格式

  / 9
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

《时间序列分析》课程实验报告

一、上机练习(P124)

1.拟合线性趋势

程序:

data xiti1;

input x@@;

t=_n_;

cards;

;

proc gplot data=xiti1;

plot x*t;

symbol c=red v=star i=join;

run;

proc autoreg data=xiti1;

model x=t;

output predicted=xhat out=out;

run;

proc gplot data=out;

plot x*t=1 xhat*t=2/overlay;

symbol2c=green v=star i=join;

run;

运行结果:

分析:上图为该序列的时序图,可以看出其具有明显的线性递增趋势,故使用线性模型进行拟合:x t=a+bt+I t,t=1,2,3,…,12

分析:上图为拟合模型的参数估计值,其中a=,b=,它们的检验P值均小于,即小于显著性水平,拒绝原假设,故其参数均显著。从而所拟合模型为:x t=+.

分析:上图中绿色的线段为线性趋势拟合线,可以看出其与原数据基本吻合。

2.拟合非线性趋势

程序:

data xiti2;

input x@@;

t=_n_;

cards;

;

proc gplot data=xiti2;

plot x*t;

symbol c=red v=star i=none;

run;

proc nlin method=gauss;

model x=a*b**t;

parameters a= b=;

=b**t;

=a*t*b**(t-1);

output predicted=xh out=out;

run;

proc gplot data=out;

plot x*t=1 xh*t=2/overlay;

symbol2c=green v=none i=join;

run;

运行结果:

分析:上图为该时间序列的时序图,可以很明显的看出其基本是呈指数函数趋势慢慢递增的,故我们可以选择指数型模型进行非线性拟合:x t=ab t+I t,t=1,2,3,…,12

分析:由上图可得该拟合模型为:x t=*+I t

分析:图中的红色星号为原序列值,绿色的曲线为拟合后的拟合曲线,可以看出原序列值与拟合值基本上是重合的,故该拟合效果是很好的。

3.X—11过程

40777 41778 43160 45897

41947 44061 44378 47237

43315 43396 44843 46835

42833 43548 44637 47107

42552 43526 45039 47940

43740 45007 46667 49325

44878 46234 47055 50318

46354 47260 48883 52605

48527 50237 51592 55152

50451 52294 54633 58802

53990 55477 57850 61978

程序:

data xiti3;

input x@@;

t=intnx('quarter','1jan1978'd,_n_-1);

format t yyq4.;

cards;

40777 41778 43160 45897

41947 44061 44378 47237

43315 43396 44843 46835

42833 43548 44637 47107

42552 43526 45039 47940

43740 45007 46667 49325

44878 46234 47055 50318

46354 47260 48883 52605

48527 50237 51592 55152

50451 52294 54633 58802

53990 55477 57850 61978

;

proc gplot data=xiti3;

plot x*t;

symbol c=red v=star i=join;

run;

proc x11 data=xiti3;

quarterly date=t;

var x;

output out=out b1=x d10=season d11=adjusted d12=trend d13=irr;

data out;

set out;

estimate=trend*season/100;

proc gplot data=out;

plot x*t=1 estimate*t=2/overlay;

plot adjusted*t=1 trend*t=1 irr*t=1;

symbol1c=red i= join v=star;

symbol2c=black i= none v=star;

run;

运行结果:

分析:上图为该序列的时序图,可以很明显的看出其具有长期增长趋势,且具有季节波动,故我们用X-11过程进行拟合。

分析:上图为季节调整后的序列值时序图。

分析:上图为趋势拟合值序列时序图。

分析:上图为不规则波动值的时序图。