Student Support Forum: 'Hybrid Optimization Techniques' topicStudent Support Forum > General > "Hybrid Optimization Techniques"

 < Previous Comment Help | Reply To Comment | Reply To Topic
 Author Comment/Response yehuda ben-shimol 11/01/10 11:35am In Response To 'Re: Hybrid Optimization Techniques'---------In addition to the Forum Moderator I must mention that the specific function is problematic. To investigate it "manually" you can try the following code (using version 7) f[i_, j_] := E^Sin[50 i] + Sin[60 E^j] + Sin[70 Sin[i]] + Sin[Sin[80 j]] - Sin[10 (i + j)] + 1/4 (i^2 + j^2); Manipulate[ sol = NMinimize[{f[i, j], -a <= i <= a, -a <= j <= a}, {i, j}, Method -> "DifferentialEvolution"][[2]]; GraphicsGrid[{{Show[ Plot3D[f[x, y], {x, -a, a}, {y, -a, a}, PlotLabel :> ({i, j, f[i, j]} /. sol)], Graphics3D[{Red, PointSize[0.05], Point[{i, j, f[i, j]} /. sol]}]], ContourPlot[f[x, y], {x, -a, a}, {y, -a, a}, PlotLabel :> ({i, j, f[i, j]} /. sol), Epilog -> {Red, PointSize[0.05], Point[{i, j} /. sol]}]}}, ImageSize -> 800], {{a, 0.1}, 0.01, 1}] HTH yehuda URL: ,

 Subject (listing for 'Hybrid Optimization Techniques') Author Date Posted Hybrid Optimization Techniques Shannon Bowl... 10/31/10 10:35am Re: Hybrid Optimization Techniques Forum Modera... 10/31/10 4:18pm Re: Re: Hybrid Optimization Techniques yehuda ben-s... 11/01/10 11:35am
 < Previous Comment Help | Reply To Comment | Reply To Topic