- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
模拟数据检验线性回归
线性回归检验
MATLAB程序regress_test2(2,3,1000),见文章最后。
实际模型为: Y= a.*X+b+ E =3+2*X+ E,E为标准正态分布随机数。
一、a=2,b=3;即:Y=2*X+3+ E
1、样本N=1000时
[b,bint,r,rint,stats] =regress_test2(2,3,1000);
format short g;b,stats
从回归系数来看3.1247-3=0.1247;1.841-2=-0.159,差的有些多。相关系数的平方:R2=0.21725,越接近1,说明回归方程越显著,此处说明X,Y的相关程度不是很高。但是统计量F检验的值为F=8460.6,?概率p接近零,近似认为拒绝H0,模型成立,残差的方差为0.98937,这个晓得原因是本来Y值的范围就不大,相比较而言,残差也不是很小。下面看增加样本是否能改善效果。
2、样本N=10000时
[b,bint,r,rint,stats] =regress_test2(2,3,10000);
format short g;b,stats
回归系数比样本为1000是时更接近一些,p为零,比刚才强一些,残差比刚才大一些。
3、样本N=100000
[b,bint,r,rint,stats] =regress_test2(2,3,100000);
format short g;b,stats
这时候样本量已经足够大,回归系数已经完全接近真值,但是R^2=0.25228,拟合度仍旧很小,说明此时X与Y的相关性不是很大,因为Y值本来就小,所以扰动项对于它的影响较大,进而X与Y的相关性应该不是很大。下面改变系数试试。
二、a=20,b=3;即:Y=20*X+3+ E
1、样本N=10000时
[b,bint,r,rint,stats] =regress_test2(20,3,10000);
format short g;b,stats
回归系数拟合的还不是很好。相关系数的平方:R2=0.97186,很接近1,说明回归方程很显著,此处说明X,Y的相关程度很高。?概率p为零,模型成立,残差的方差为0.98937,这次相较于Y值而言,还是比较小的。下面看增加样本后的效果。
2、样本N=100000
[b,bint,r,rint,stats] =regress_test2(20,3,100000);
format short g;b,stats
现在X与Y的相关性的确很强,这次回归系数与真值也较为接近,残差比刚才大了些,从上面也可以发现样本量较大时会导致残差也较大一些。
function [b,bint,r,rint,stats] =regress_test2(a,b,N)
X=rand(N,1);
E=randn(N,1);
Y=a.*X+b+E;
X1=[ones(N,1),X];
[b,bint,r,rint,stats] = regress(Y,X1);
[P,S]=polyfit(X,Y,1); %多项式拟合函数,此处为一次多项式,P是系数,与上面的b相同。
x1=min(X):0.0001:max(X);
f=polyval(P,x1); %回归模型
[W,d]=polyconf(P,X,S,0.05); %求置信度为1-0.05的置信区间[w-d,w+d]
plot(X,Y,k.,x1,f,.); %绘图查看拟合效果
hold on;
plot(X,W+d,.);
plot(X,W-d,.);
title(N)
您可能关注的文档
最近下载
- 人教版地理必修一教材解读(2019年版).pptx VIP
- 初中音乐教学课件走进京剧.ppt VIP
- 2022年土地登记代理人题库700道及参考答案【培优b卷】.docx
- 药剂职业生涯规划目标.pptx VIP
- 2025年SpaceX火箭推进系统技术创新及市场影响报告.docx VIP
- (新版)油品计量工(技师)职业鉴定考试题库资料(浓缩400题).pdf VIP
- 全国大学生职业规划大赛《法学》专业生涯发展展示PPT【最新版】.pptx
- (精选)实践是认识的基础教学课件.ppt VIP
- 2023年市政工程质量检测见证取样员手册培训资料.doc VIP
- 【MOOC】微观经济学-浙江大学 中国大学慕课MOOC答案.docx VIP
原创力文档


文档评论(0)