实验十:寻优 10.1光的折射定律 光在同一种介质中走最短 路线(直线),聪明! 从一种介质进入另一种介 质发生折射,傻了?
实验十：寻优 10.1 光的折射定律 光在同一种介质中走最短 路线（直线），聪明！ 从一种介质进入另一种介 质发生折射，傻了？
问题 设光在两种介质中的速度 比为u,两介质分界线为直 线。从第一介质的A点到第 介质的B点,走怎样的路 线时间最短
设光在两种介质中的速度 比为 u，两介质分界线为直 线。从第一介质的A点到第 二介质的B点，走怎样的路 线时间最短？ 问题：
求f(x)的最小值 1)利用 Mathematica 画出y=f(×)的图象,观察 最小值点的近似位置X=C 运行语句 FindMinimum[Rx, C]
1） 利用Mathematica： 画出 y=f(x) 的图象，观察 最小值点的近似位置x=c. 运行语句 FindMinimum[f,{x,c}] 求 f(x) 的最小值
2)0.618搜索法(求每一 点的f值需花成本) 确定最初的搜索区间[a,b] 记d=b-a.插入两分点 x1=a+0382d0382点) X2=a+0.618d(0.618点) 求出f(X1),f(X2)
确定最初的搜索区间[a,b] 记d=b-a. 插入两分点 x1= a+0.382d (0.382点） x2= a+0.618d （0.618点） 求出 f(x1),f(x2). 2） 0.618 搜索法（求每一 点的 f 值需花成本）：
如果f(×1)优于f(X2),用 [ax2]代替[ab]。X1已是 0.618点,只须再求0382 点的值。 否则,用X1b代替[a,b]。 下断重复以上过程
如果f(x1)优于f(x2),用 [a,x2] 代替[a,b]。 x1已是 0.618 点，只须再求0.382 点的值。 否则，用[x1,b]代替[a,b]。 不断重复以上过程