Example 3.  Find the local maximum of the function  [Graphics:Images/GoldenRatioSearchMod_gr_152.gif]  in the interval  [Graphics:Images/GoldenRatioSearchMod_gr_153.gif].

Solution 3.

[Graphics:../Images/GoldenRatioSearchMod_gr_154.gif]


[Graphics:../Images/GoldenRatioSearchMod_gr_155.gif]

[Graphics:../Images/GoldenRatioSearchMod_gr_156.gif]

We see that the local maximum lies in the interval  [Graphics:../Images/GoldenRatioSearchMod_gr_157.gif].

So we will search for the local minimum of   [Graphics:../Images/GoldenRatioSearchMod_gr_158.gif]  in the interval  [Graphics:../Images/GoldenRatioSearchMod_gr_159.gif].

 

[Graphics:../Images/GoldenRatioSearchMod_gr_160.gif]


[Graphics:../Images/GoldenRatioSearchMod_gr_161.gif]



[Graphics:../Images/GoldenRatioSearchMod_gr_162.gif]


[Graphics:../Images/GoldenRatioSearchMod_gr_163.gif]

[Graphics:../Images/GoldenRatioSearchMod_gr_164.gif]

 

Therefore, to find the local maximum of  [Graphics:../Images/GoldenRatioSearchMod_gr_165.gif] we take the negative of the local minimum of  [Graphics:../Images/GoldenRatioSearchMod_gr_166.gif].   

 

[Graphics:../Images/GoldenRatioSearchMod_gr_167.gif]


[Graphics:../Images/GoldenRatioSearchMod_gr_168.gif]

[Graphics:../Images/GoldenRatioSearchMod_gr_169.gif]

 

 

Let us compare this answer with Mathematica's subroutine FindMinimum.

 

[Graphics:../Images/GoldenRatioSearchMod_gr_170.gif]


[Graphics:../Images/GoldenRatioSearchMod_gr_171.gif]
[Graphics:../Images/GoldenRatioSearchMod_gr_172.gif]
[Graphics:../Images/GoldenRatioSearchMod_gr_173.gif]
[Graphics:../Images/GoldenRatioSearchMod_gr_174.gif]
[Graphics:../Images/GoldenRatioSearchMod_gr_175.gif]
[Graphics:../Images/GoldenRatioSearchMod_gr_176.gif]

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

(c) John H. Mathews 2004