的一些例题)。
eg:
workfile exer99-1 u 1 8
'建立工作文件exer99-1,u表示非时序数据
series x
'建立序列x
x.fill 2,3,5,6,7,9,10,12
'逐个输入序列x的元素
series y
y.fill 6,8,11,14,16,19,22,25
equation eq1
'建立方程eq1
do eq1.ls y c x
'用最小二乘法估计方程eq1: y=c(1)+c(2)*x
show eq1
'以通常方式显示方程eq1的估计结果
scalar r=sqr(@r2)
'提取拟合优度并开方后赋值给r得x,y相关系数
show r
'在屏幕左下角显示r
workfile exer99-2 a 1978 1986
'a表示年度数据
series y
y.fill 8.5,11.1,13.6,15.8,17.6,20.5,27.8,33.5,39.2
series x
x.fill 11.6,14.1,17.1,19.6,22.1,25.6,33.6,40.5,47.8
equation eq992
do eq992.ls y c x
show eq992
scalar r=sqr(@r2)
show r
scalar x0=47.8*1.19
scalar y0=c(1)+c(2)*x0
'计算预测值
show y0
scalar xbar=@mean(x)
'求(样本区间内的)x的平均值
scalar n=9
'样本容量
scalar s0
series xbare
for !k=1 to 9
xbare(!k)=(x(!k)-xbar)^2
next
s0=@sum(xbare)
'求(样本区间内的)xbare的和
s0=sqr((1+1/n+(x0-xbar)^2)/s0)*@se
'用@se提取方程的回归标准差
scalar tq=@qtdist(0.975,n-2)
'计算t分布的0.975分位数函数值
scalar y0l=y0-tq*s0
'预测区间左端点
scalar y0r=y0+tq*s0
'


雷达卡


京公网安备 11010802022788号







