- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验一:一维搜索算法
学号:2010310200918 班级:信息1001 姓名:万琪
一、实验目的
对精确一维搜索的主要两种算法(试探法、插值法)思想有深刻的认识,能够通过程序实现,并比较不同算法的好坏。
二、实验内容
1.用0.618法求解一维问题:
在区间内的极小点计算4步。
实验步骤:
运行平台:Matlab R2009a
0.618法的算法流程:
(1)设置初始搜索区间,精度要求,计算左试探点:,右试探点:, ,,其中。
(2)
,并计算:,;
否则:
,并计算:,.
(3)如果,则:
,
否则:,停止计算.
否则返回步骤(2).
(4)输出极小值点().
实验程序:
(程序见附件一)
实验结果:
迭代次数 1 1.0000 2.0000 1.3820 1.6180 -2.9271 -3.0470 1.0000 2 1.3820 2.0000 1.6180 1.7639 -3.0470 -2.9843 0.6180 3 1.3820 1.7639 1.5279 1.6180 -3.0310 -3.0470 0.3820 4 1.5279 1.7639 1.6180 1.6738 -3.0470 -3.0366 0.2361 极小点为:(1.6180 , -3.0470)
2.用三点二次插值法求解一维问题
取初始点=0,=1,=3,。
实验步骤:
运行平台:Matlab R2009a
三点二次插值法的算法流程:
(1)取初始点,计算,,,并且满足,设置精度。
(2)计算
如果=0,则置,停止计算。
(3)计算
如果,则置,停止计算。
(4)计算.如果,停止计算.
(5)如果,则:
如果,则置
否则,置.
否则:
如果,则置
否则,置.
(6)转向步骤(2).
(7)输出极小点().
实验程序:
(程序见附件二)
实验结果:
迭代次数 U1 U2 U3 F1 F2 F3 U F 1 0 1.0000 3.0000 1.0000 0 22.0000 0.6250 -0.0059 0.3750 2 0 0.6250 1.0000 1.0000 -0.0059 0 0.8077 -0.0885 0.1827 3 0.6250 0.8077 1.0000 -0.0059 -0.0885 0 0.8093 -0.0885 0.0016 极小点为:(0.8093 , -0.0885)
三、算法比较:
用两种方法求上面的问题2,设置精度,得到实验结果为:
算法 极小点 迭代次数 0.618法 1.0000 0.0000 20 三点二次插值法 0.8165 -0.0887 6
可以看出用插值法计算迭代次数远小于0.618法,但是0.618法逼近极小点的效果更好。
四、实验心得
对于精确一维搜索的两种算法思想,0.618法每次迭代计算只用计算一次函数值,通过取试探点的函数值进行比较,不断缩小搜索范围,最终可以得到精确的极小点;三点二次插值法通过每次取得的三个点构造插值多项式,取其极小值来逼近原函数的极小点,效率更高。通过比较发现,要达到预期的精度,插值法比试探法的迭代次数少很多。
五、附件
附件一:
0.618法的Matlab程序:
function main()
clc,clear
a=1;%区间上界
b=2;%区间下界
u=a;%最优解
e=1e-1;%设置精度要求
tao=(sqrt(5)-1)/2;
al=a+(1-tao)*(b-a);ar=a+tao*(b-a);
fl=fun(al);fr=fun(ar);
N=0;
while abs(b-a)e
[a,b,al,ar,fl,fr,abs(b-a)]
if flfr
b=ar;ar=al; fr=fl;
al=a+(1-tao)*(b-a);fl=fun(al);
else
a=al;al=ar; fl=fr;
ar=a+tao*(b-a);fr=fun(ar);
end
if flfr
u=al;
else
u=ar;
end
N=N+1;
end
[a,b,al,ar,fl,fr,abs(b-a)]
N
disp(----------最优解---------);
disp( u f(u) );
disp([u,fun(u)]);
end
%%
function f=fun(x)
f=x^3-2*x+1;
end
附件二:
三点二次插值法的Matlab程序:
function main()
clc,clear
u1=0;u2=1;u3=3;
f1=f
原创力文档


文档评论(0)