汽车测试基础实验报告封面模版实验报告填写要求.docx
《汽车测试基础实验报告封面模版实验报告填写要求.docx》由会员分享,可在线阅读,更多相关《汽车测试基础实验报告封面模版实验报告填写要求.docx(14页珍藏版)》请在冰豆网上搜索。
汽车测试基础实验报告封面模版实验报告填写要求
实验报告(理工类)
开课学院及实验室:
计算机实验室实验时间:
学生姓名
学号
实验成绩
课程名称
汽车测试基础
课程代码
实验项目名称
一元线性回归分析
项目代码
指导教师
项目学分
实验课考勤
实验工作表现
实验报告
实验目的
1.一元线性回归方程的求解;
2.回归直线的显著性检验;
实验设备、仪器及材料
1.CPUPIII1000HZ,内存64MBRAM,1G硬盘空间计算机;
2.安装VisualBasic6.0;
3、实验内容
3.1实验原理及实验步骤(实验工作原理或实验的主要操作过程)
1.在VB程序中,讲原始数据用二维XY图绘制出来;
X
1
3
8
10
13
15
17
20
y
7.5
10.1
14.8
17.5
20.2
22.4
25.1
27.6
2.观察其是否近似为直线关系,如果是,则利用一元线性回归分析进行直线拟合,y=a+bx;
3.利用最小二乘法,计算a,b参数;
b=
a=
4.在图中适当位置,标出拟合直线方程;
5.采用相关系数检验进行回归直线的显著性检验。
r=b
3.2实验记录(核心代码及调试过程)
1.程序主界面设计
图1程序主界面
相关代码:
PrivateSub一元非线性回归分析_Click()
Form2.Show
EndSub
PrivateSub一元线性回归分析_Click()
Form1.Show
EndSub
2.一元线性回归分析界面设计
图2一元线性回归界面
3.赋初值
图3赋初值后的界面
command1下相关代码:
PrivateSubCommand1_Click()
Text1(0)=1‘为text1控件数组赋值
Text1
(1)=3
Text1
(2)=8
Text1(3)=10
Text1(4)=13
Text1(5)=15
Text1(6)=17
Text1(7)=20
Text2(0)=7.5‘为text2控件数组赋值
Text2
(1)=10.1
Text2
(2)=14.8
Text2(3)=17.5
Text2(4)=20.2
Text2(5)=22.4
Text2(6)=25.1
Text2(7)=27.6
EndSub
4.描点,连线
图4描点连线后的界面
Command2下相关代码:
PrivateSubCommand2_Click()
Picture1.Scale(-2,30)-(30,-2)给出用户坐标系统的左上角与右下角
Picture1.Line(-30,0)-(30,0):
Picture1.Line(0,30)-(0,-30)画出坐标轴
Picture1.DrawWidth=3改变描点大小
Fori=0To7
Picture1.PSet(Text1(i),Text2(i))描点
Nexti
Picture1.DrawWidth=1
Fori=0To6
Picture1.Line(Text1(i),Text2(i))-(Text1(i+1),Text2(i+1))画线
Nexti
EndSub
5.一元线性回归分析
图5直线拟合后的界面
Command3下相关代码:
PrivateSubCommand3_Click()
Forj=0To7用最小二乘法计算a,b值
sumX=sumX+Val(Text1(j))
sumY=sumY+Val(Text2(j))
Nextj
averX=sumX/8
averY=sumY/8
Forj=0To7
Lxx=Lxx+(Text1(j)-averX)^2
Lxy=Lxy+(Text1(j)-averX)*(Text2(j)-averY)
Lyy=Lyy+(Text2(j)-averY)*(Text2(j)-averY)
Nextj
b=Lxy/Lxx
a=averY-b*averX
Picture1.Line(Text1(0),a+b*Text1(0))-(Text1(7),a+b*Text1(7)),RGB(255,0,0)
r=b*(Lxx/Lyy)^(1/2)
Picture2.Print"回归直线显著性检验:
"
Picture2.Print"其系数r="&r
Ifr>0.5Then
Line(Text1(0),a+b*Text1(0))-(Text1(7),a+b*Text1(7))
Picture2.Print"近似为线性,符合要求"
Else
Picture2.Print"近似为线性,符合要求"
EndIf
EndSub
4、实验总结
4.1实验结果分析及问题讨论
1、a,b参数的计算公式是怎么得出的
答:
在误差理论中最小二乘法的基本含义是:
在具有等精度的多次测量中,求最可信值时,是当各测量值的偏差平方和为最小值时所求得的值。
根据上述原理,用最小二乘法对测量数据进行线性拟合时,是把所有测量数据点都标在坐标图上,用最小二乘法拟合的直线,其各数据点与拟合直线之间的偏差平方和为最小。
用数学表达式可写为
式中,——第i数据点与拟合直线之间的偏差。
对线性方程y=a+bx,按按上式,根据所有测量数据可得其最小值,
求解线性回归系数a、b为
a=b=
4.2实验总结心得体会
试验中要求对相关知识有足够的了解,尤其是VB。
在编程过程中,我们会遇到很多的问题,应该要虚心求教,向老师和同学多问,自己不懂的知识也要多翻看书籍资料,要和同学们积极讨论,分析并解决问题,取得共同进步。
遇到问题要仔细查看程序中的错误之处,然后调试改正,尽力完善程序。
4.3附录
VisualBasic程序设计教程(主编杨明广《中国科学技术出版社》)
汽车测试技术(主编唐岚《机械工业出版社》)
注解:
实验总结的内容根据不同学科和类型实验要求不一样,一般理工科类的实验需要对实验结果进行分析,并且对实验过程中问题进行讨论;在计算机上进行的编程、仿真性或模拟性实验需要对上机实践结果进行分析,上机的心得体会及改进意见。
其它实验应总结实验过程写出心得体会及改进意见。
说明:
各门实验课程实验报告的格式及内容要求,请按照实验指导书的要求手工书写。
实验报告(理工类)
开课学院及实验室:
计算机实验室实验时间:
学生姓名
学号
实验成绩
课程名称
汽车测试基础
课程代码
实验项目名称
一元非线性回归分析
项目代码
指导教师
项目学分
实验课考勤
实验工作表现
实验报告
1、实验目的
1.异常数据的取舍;
2.一元非线性回归方程的求解;
2、实验设备、仪器及材料
1.CPUIII1000HZ,内存64MBRAM,1G硬盘空间计算机;
2.安装VisualBasic6.0;
3、实验内容
3.1实验原理及实验步骤(实验工作原理或实验的主要操作过程)
1.在VB程序中,将原始数据用二维XY图绘制出来:
x
11
13
15
18
20
23
25
28
30
32
35
y
45
34
30
26
23
20.2
23
19
18
17.6
15
2.观察数据曲线,是否有异常数据?
如有,按照相关准则,进行取舍。
3.去掉异常数据,观察曲线类型,利用非线性曲线→直线的方法,再利用一元线性回归分析进行直线拟合,最后得到曲线方程
4.在图中适当位置,标出拟合后的曲线方程。
3.2实验记录(核心代码及调试过程)
1.程序主界面设计同一元线性回归分析
2.一元非线性回归分析界面设计
图6一元非线性回归界面设计
3.赋初值
图7赋初值后的界面
Command1下程序代码:
PrivateSubCommand1_Click()
Text1(0)=11为text1数组控件赋值
Text1
(1)=13
Text1
(2)=15
Text1(3)=18
Text1(4)=20
Text1(5)=23
Text1(6)=25
Text1(7)=28
Text1(8)=30
Text1(9)=32
Text1(10)=35
Text2(0)=45为text2数组控件赋值
Text2
(1)=34
Text2
(2)=30
Text2(3)=26
Text2(4)=23
Text2(5)=20.2
Text2(6)=23
Text2(7)=19
Text2(8)=18
Text2(9)=17.6
Text2(10)=15
EndSub
4.描点,连线
图8描点连线后的界面
Command2下的程序代码:
PrivateSubCommand2_Click()
Picture1.Scale(-4,50)-(50,-8)给出用户坐标系统的左上角与右下角坐标
Picture1.Line(-50,0)-(50,0):
Picture1.Line(0,50)-(0,-50)画出坐标轴
Picture1.DrawWidth=3改变描点大小
Fori=0To10
Picture1.PSet(Text1(i),Text2(i))描点
Nexti
Picture1.DrawWidth=1
Fori=0To9
Picture1.Line(Text1(i),Text2(i))-(Text1(i+1),Text2(i+1))连线
Nexti
EndSub
5.一元非线性回归分析直线拟合后界面
图9直线拟合后界面
Command3下程序代码:
PrivateSubCommand3_Click()直线拟合
Fori=0To10
sumX=sumX+Val(Text1(i))
sunY=sumY+Val(Text2(i))
Nexti
averX=sumX/11
averY=sumY/11
Fori=0To10
vi_sum=Round(vi_sum+(Text2(i)-averY)^2)
Nexti
e=Round((vi_sum/9)^1/2)
Fori=0To10
lnX_sum