forked from tsai/mathnet-numerics
committed by
GitHub
15 changed files with 775 additions and 670 deletions
@ -0,0 +1,158 @@ |
|||||
|
// <copyright file="BfgsTest.cs" company="Math.NET">
|
||||
|
// Math.NET Numerics, part of the Math.NET Project
|
||||
|
// http://numerics.mathdotnet.com
|
||||
|
// http://github.com/mathnet/mathnet-numerics
|
||||
|
// http://mathnetnumerics.codeplex.com
|
||||
|
//
|
||||
|
// Copyright (c) 2009-2016 Math.NET
|
||||
|
//
|
||||
|
// Permission is hereby granted, free of charge, to any person
|
||||
|
// obtaining a copy of this software and associated documentation
|
||||
|
// files (the "Software"), to deal in the Software without
|
||||
|
// restriction, including without limitation the rights to use,
|
||||
|
// copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||||
|
// copies of the Software, and to permit persons to whom the
|
||||
|
// Software is furnished to do so, subject to the following
|
||||
|
// conditions:
|
||||
|
//
|
||||
|
// The above copyright notice and this permission notice shall be
|
||||
|
// included in all copies or substantial portions of the Software.
|
||||
|
//
|
||||
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||||
|
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
|
||||
|
// OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
||||
|
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
|
||||
|
// HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
||||
|
// WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||||
|
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
||||
|
// OTHER DEALINGS IN THE SOFTWARE.
|
||||
|
// </copyright>
|
||||
|
|
||||
|
using MathNet.Numerics.LinearAlgebra; |
||||
|
using MathNet.Numerics.LinearAlgebra.Double; |
||||
|
using MathNet.Numerics.Optimization.LineSearch; |
||||
|
using System; |
||||
|
|
||||
|
namespace MathNet.Numerics.Optimization |
||||
|
{ |
||||
|
public abstract class BfgsMinimizerBase |
||||
|
{ |
||||
|
public double GradientTolerance { get; set; } |
||||
|
public double ParameterTolerance { get; set; } |
||||
|
public double FunctionProgressTolerance { get; set; } |
||||
|
public int MaximumIterations { get; set; } |
||||
|
|
||||
|
protected const double VerySmall = 1e-15; |
||||
|
|
||||
|
/// <summary>
|
||||
|
/// Creates a base class for BFGS minimization
|
||||
|
/// </summary>
|
||||
|
/// <param name="gradientTolerance">The gradient tolerance</param>
|
||||
|
/// <param name="parameterTolerance">The parameter tolerance</param>
|
||||
|
/// <param name="functionProgressTolerance">The funciton progress tolerance</param>
|
||||
|
/// <param name="maximumIterations">The maximum number of iterations</param>
|
||||
|
public BfgsMinimizerBase(double gradientTolerance, double parameterTolerance, double functionProgressTolerance, int maximumIterations) |
||||
|
{ |
||||
|
GradientTolerance = gradientTolerance; |
||||
|
ParameterTolerance = parameterTolerance; |
||||
|
FunctionProgressTolerance = functionProgressTolerance; |
||||
|
MaximumIterations = maximumIterations; |
||||
|
} |
||||
|
|
||||
|
protected MinimizationResult.ExitCondition ExitCriteriaSatisfied(IObjectiveFunction candidatePoint, IObjectiveFunction lastPoint, int iterations) |
||||
|
{ |
||||
|
Vector<double> relGrad = new DenseVector(candidatePoint.Point.Count); |
||||
|
double relativeGradient = 0.0; |
||||
|
double normalizer = Math.Max(Math.Abs(candidatePoint.Value), 1.0); |
||||
|
for (int ii = 0; ii < relGrad.Count; ++ii) |
||||
|
{ |
||||
|
double projectedGradient = GetProjectedGradient(candidatePoint, ii); |
||||
|
|
||||
|
double tmp = projectedGradient * |
||||
|
Math.Max(Math.Abs(candidatePoint.Point[ii]), 1.0) / normalizer; |
||||
|
relativeGradient = Math.Max(relativeGradient, Math.Abs(tmp)); |
||||
|
} |
||||
|
if (relativeGradient < GradientTolerance) |
||||
|
{ |
||||
|
return MinimizationResult.ExitCondition.RelativeGradient; |
||||
|
} |
||||
|
|
||||
|
if (lastPoint != null) |
||||
|
{ |
||||
|
double mostProgress = 0.0; |
||||
|
for (int ii = 0; ii < candidatePoint.Point.Count; ++ii) |
||||
|
{ |
||||
|
var tmp = Math.Abs(candidatePoint.Point[ii] - lastPoint.Point[ii]) / |
||||
|
Math.Max(Math.Abs(lastPoint.Point[ii]), 1.0); |
||||
|
mostProgress = Math.Max(mostProgress, tmp); |
||||
|
} |
||||
|
if (mostProgress < ParameterTolerance) |
||||
|
{ |
||||
|
return MinimizationResult.ExitCondition.LackOfProgress; |
||||
|
} |
||||
|
|
||||
|
double functionChange = candidatePoint.Value - lastPoint.Value; |
||||
|
if (iterations > 500 && functionChange < 0 && Math.Abs(functionChange) < FunctionProgressTolerance) |
||||
|
return MinimizationResult.ExitCondition.LackOfProgress; |
||||
|
} |
||||
|
|
||||
|
return MinimizationResult.ExitCondition.None; |
||||
|
} |
||||
|
|
||||
|
protected virtual double GetProjectedGradient(IObjectiveFunction candidatePoint, int ii) |
||||
|
{ |
||||
|
return candidatePoint.Gradient[ii]; |
||||
|
} |
||||
|
|
||||
|
protected void ValidateGradientAndObjective(IObjectiveFunction eval) |
||||
|
{ |
||||
|
foreach (var x in eval.Gradient) |
||||
|
{ |
||||
|
if (Double.IsNaN(x) || Double.IsInfinity(x)) |
||||
|
throw new EvaluationException("Non-finite gradient returned.", eval); |
||||
|
} |
||||
|
if (Double.IsNaN(eval.Value) || Double.IsInfinity(eval.Value)) |
||||
|
throw new EvaluationException("Non-finite objective function returned.", eval); |
||||
|
} |
||||
|
|
||||
|
protected int DoBfgsUpdate(ref MinimizationResult.ExitCondition currentExitCondition, WolfeLineSearch lineSearcher, ref Matrix<double> inversePseudoHessian, ref Vector<double> lineSearchDirection, ref IObjectiveFunction previousPoint, ref LineSearchResult lineSearchResult, ref IObjectiveFunction candidate, ref Vector<double> step, ref int totalLineSearchSteps, ref int iterationsWithNontrivialLineSearch) |
||||
|
{ |
||||
|
int iterations; |
||||
|
for (iterations = 1; iterations < MaximumIterations; ++iterations) |
||||
|
{ |
||||
|
double startingStepSize; |
||||
|
double maxLineSearchStep; |
||||
|
lineSearchDirection = CalculateSearchDirection(ref inversePseudoHessian, out maxLineSearchStep, out startingStepSize, previousPoint, candidate, step); |
||||
|
|
||||
|
try |
||||
|
{ |
||||
|
lineSearchResult = lineSearcher.FindConformingStep(candidate, lineSearchDirection, startingStepSize, maxLineSearchStep); |
||||
|
} |
||||
|
catch (Exception e) |
||||
|
{ |
||||
|
throw new InnerOptimizationException("Line search failed.", e); |
||||
|
} |
||||
|
|
||||
|
iterationsWithNontrivialLineSearch += lineSearchResult.Iterations > 0 ? 1 : 0; |
||||
|
totalLineSearchSteps += lineSearchResult.Iterations; |
||||
|
|
||||
|
step = lineSearchResult.FunctionInfoAtMinimum.Point - candidate.Point; |
||||
|
previousPoint = candidate; |
||||
|
candidate = lineSearchResult.FunctionInfoAtMinimum; |
||||
|
|
||||
|
currentExitCondition = ExitCriteriaSatisfied(candidate, previousPoint, iterations); |
||||
|
if (currentExitCondition != MinimizationResult.ExitCondition.None) |
||||
|
break; |
||||
|
} |
||||
|
|
||||
|
return iterations; |
||||
|
} |
||||
|
|
||||
|
protected abstract Vector<double> CalculateSearchDirection(ref Matrix<double> inversePseudoHessian, |
||||
|
out double maxLineSearchStep, |
||||
|
out double startingStepSize, |
||||
|
IObjectiveFunction previousPoint, |
||||
|
IObjectiveFunction candidate, |
||||
|
Vector<double> step); |
||||
|
} |
||||
|
} |
||||
@ -1,111 +1,50 @@ |
|||||
using System; |
// <copyright file="BfgsTest.cs" company="Math.NET">
|
||||
using MathNet.Numerics.LinearAlgebra; |
// Math.NET Numerics, part of the Math.NET Project
|
||||
|
// http://numerics.mathdotnet.com
|
||||
|
// http://github.com/mathnet/mathnet-numerics
|
||||
|
// http://mathnetnumerics.codeplex.com
|
||||
|
//
|
||||
|
// Copyright (c) 2009-2016 Math.NET
|
||||
|
//
|
||||
|
// Permission is hereby granted, free of charge, to any person
|
||||
|
// obtaining a copy of this software and associated documentation
|
||||
|
// files (the "Software"), to deal in the Software without
|
||||
|
// restriction, including without limitation the rights to use,
|
||||
|
// copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||||
|
// copies of the Software, and to permit persons to whom the
|
||||
|
// Software is furnished to do so, subject to the following
|
||||
|
// conditions:
|
||||
|
//
|
||||
|
// The above copyright notice and this permission notice shall be
|
||||
|
// included in all copies or substantial portions of the Software.
|
||||
|
//
|
||||
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||||
|
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
|
||||
|
// OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
||||
|
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
|
||||
|
// HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
||||
|
// WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||||
|
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
||||
|
// OTHER DEALINGS IN THE SOFTWARE.
|
||||
|
// </copyright>
|
||||
|
|
||||
|
using System; |
||||
|
|
||||
namespace MathNet.Numerics.Optimization.LineSearch |
namespace MathNet.Numerics.Optimization.LineSearch |
||||
{ |
{ |
||||
public class StrongWolfeLineSearch |
public class StrongWolfeLineSearch : WolfeLineSearch |
||||
{ |
{ |
||||
public double C1 { get; set; } |
|
||||
public double C2 { get; set; } |
|
||||
public double ParameterTolerance { get; set; } |
|
||||
public int MaximumIterations { get; set; } |
|
||||
|
|
||||
public StrongWolfeLineSearch(double c1, double c2, double parameterTolerance, int maxIterations = 10) |
public StrongWolfeLineSearch(double c1, double c2, double parameterTolerance, int maxIterations = 10) |
||||
|
: base(c1, c2, parameterTolerance, maxIterations) |
||||
{ |
{ |
||||
C1 = c1; |
// Argument validation in base class
|
||||
C2 = c2; |
|
||||
ParameterTolerance = parameterTolerance; |
|
||||
MaximumIterations = maxIterations; |
|
||||
} |
} |
||||
|
|
||||
// Implemented following http://www.math.washington.edu/~burke/crs/408/lectures/L9-weak-Wolfe.pdf
|
protected override MinimizationResult.ExitCondition WolfeExitCondition { get { return MinimizationResult.ExitCondition.StrongWolfeCriteria; } } |
||||
public LineSearchResult FindConformingStep(IObjectiveFunctionEvaluation objective, Vector<double> searchDirection, double initialStep, double upperBound = Double.PositiveInfinity) |
|
||||
{ |
|
||||
double lowerBound = 0.0; |
|
||||
double step = initialStep; |
|
||||
|
|
||||
double initialValue = objective.Value; |
|
||||
Vector<double> initialGradient = objective.Gradient; |
|
||||
|
|
||||
double initialDd = searchDirection*initialGradient; |
|
||||
|
|
||||
int ii; |
|
||||
IObjectiveFunction candidateEval = objective.CreateNew(); |
|
||||
MinimizationResult.ExitCondition reasonForExit = MinimizationResult.ExitCondition.None; |
|
||||
for (ii = 0; ii < this.MaximumIterations; ++ii) |
|
||||
{ |
|
||||
candidateEval.EvaluateAt(objective.Point + searchDirection*step); |
|
||||
|
|
||||
double stepDd = searchDirection*candidateEval.Gradient; |
|
||||
|
|
||||
if (candidateEval.Value > initialValue + C1*step*initialDd) |
|
||||
{ |
|
||||
upperBound = step; |
|
||||
step = 0.5*(lowerBound + upperBound); |
|
||||
} |
|
||||
else if (Math.Abs(stepDd) > C2*Math.Abs(initialDd)) |
|
||||
{ |
|
||||
lowerBound = step; |
|
||||
step = Double.IsPositiveInfinity(upperBound) ? 2*lowerBound : 0.5*(lowerBound + upperBound); |
|
||||
} |
|
||||
else |
|
||||
{ |
|
||||
reasonForExit = MinimizationResult.ExitCondition.StrongWolfeCriteria; |
|
||||
break; |
|
||||
} |
|
||||
|
|
||||
if (!Double.IsInfinity(upperBound)) |
|
||||
{ |
|
||||
double maxRelChange = 0.0; |
|
||||
for (int jj = 0; jj < candidateEval.Point.Count; ++jj) |
|
||||
{ |
|
||||
double tmp = Math.Abs(searchDirection[jj]*(upperBound - lowerBound))/Math.Max(Math.Abs(candidateEval.Point[jj]), 1.0); |
|
||||
maxRelChange = Math.Max(maxRelChange, tmp); |
|
||||
} |
|
||||
if (maxRelChange < ParameterTolerance) |
|
||||
{ |
|
||||
reasonForExit = MinimizationResult.ExitCondition.LackOfProgress; |
|
||||
break; |
|
||||
} |
|
||||
} |
|
||||
} |
|
||||
|
|
||||
if (ii == MaximumIterations && Double.IsPositiveInfinity(upperBound)) |
|
||||
throw new MaximumIterationsException(String.Format("Maximum iterations ({0}) reached. Function appears to be unbounded in search direction.", MaximumIterations)); |
|
||||
if (ii == MaximumIterations) |
|
||||
throw new MaximumIterationsException(String.Format("Maximum iterations ({0}) reached.", MaximumIterations)); |
|
||||
|
|
||||
return new LineSearchResult(candidateEval, ii, step, reasonForExit); |
|
||||
} |
|
||||
|
|
||||
bool Conforms(IObjectiveFunction startingPoint, Vector<double> searchDirection, double step, IObjectiveFunction endingPoint) |
|
||||
{ |
|
||||
bool sufficientDecrease = endingPoint.Value <= startingPoint.Value + C1*step*(startingPoint.Gradient*searchDirection); |
|
||||
bool notTooSteep = endingPoint.Gradient*searchDirection >= C2*startingPoint.Gradient*searchDirection; |
|
||||
|
|
||||
return step > 0 && sufficientDecrease && notTooSteep; |
|
||||
} |
|
||||
|
|
||||
void ValidateValue(IObjectiveFunction eval) |
|
||||
{ |
|
||||
if (!IsFinite(eval.Value)) |
|
||||
throw new EvaluationException(String.Format("Non-finite value returned by objective function: {0}", eval.Value), eval); |
|
||||
} |
|
||||
|
|
||||
void ValidateGradient(IObjectiveFunction eval) |
|
||||
{ |
|
||||
foreach (double x in eval.Gradient) |
|
||||
{ |
|
||||
if (!IsFinite(x)) |
|
||||
{ |
|
||||
throw new EvaluationException(String.Format("Non-finite value returned by gradient: {0}", x), eval); |
|
||||
} |
|
||||
} |
|
||||
} |
|
||||
|
|
||||
bool IsFinite(double x) |
protected override bool WolfeCondition(double stepDd, double initialDd) |
||||
{ |
{ |
||||
return !(Double.IsNaN(x) || Double.IsInfinity(x)); |
return Math.Abs(stepDd) > C2 * Math.Abs(initialDd); |
||||
} |
} |
||||
} |
} |
||||
} |
} |
||||
|
|||||
@ -0,0 +1,158 @@ |
|||||
|
// <copyright file="BfgsTest.cs" company="Math.NET">
|
||||
|
// Math.NET Numerics, part of the Math.NET Project
|
||||
|
// http://numerics.mathdotnet.com
|
||||
|
// http://github.com/mathnet/mathnet-numerics
|
||||
|
// http://mathnetnumerics.codeplex.com
|
||||
|
//
|
||||
|
// Copyright (c) 2009-2016 Math.NET
|
||||
|
//
|
||||
|
// Permission is hereby granted, free of charge, to any person
|
||||
|
// obtaining a copy of this software and associated documentation
|
||||
|
// files (the "Software"), to deal in the Software without
|
||||
|
// restriction, including without limitation the rights to use,
|
||||
|
// copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||||
|
// copies of the Software, and to permit persons to whom the
|
||||
|
// Software is furnished to do so, subject to the following
|
||||
|
// conditions:
|
||||
|
//
|
||||
|
// The above copyright notice and this permission notice shall be
|
||||
|
// included in all copies or substantial portions of the Software.
|
||||
|
//
|
||||
|
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||||
|
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
|
||||
|
// OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
||||
|
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
|
||||
|
// HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
||||
|
// WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||||
|
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
||||
|
// OTHER DEALINGS IN THE SOFTWARE.
|
||||
|
// </copyright>
|
||||
|
|
||||
|
using MathNet.Numerics.LinearAlgebra; |
||||
|
using System; |
||||
|
|
||||
|
namespace MathNet.Numerics.Optimization.LineSearch |
||||
|
{ |
||||
|
public abstract class WolfeLineSearch |
||||
|
{ |
||||
|
protected double C1 { get; } |
||||
|
protected double C2 { get; } |
||||
|
protected double ParameterTolerance { get; } |
||||
|
protected int MaximumIterations { get; } |
||||
|
|
||||
|
public WolfeLineSearch(double c1, double c2, double parameterTolerance, int maxIterations = 10) |
||||
|
{ |
||||
|
if (c1 <= 0) |
||||
|
throw new ArgumentException(string.Format("c1 {0} should be greater than 0", c1)); |
||||
|
if (c2 <= c1) |
||||
|
throw new ArgumentException(string.Format("c1 {0} should be less than c2 {1}", c1, c2)); |
||||
|
if (c2 >= 1) |
||||
|
throw new ArgumentException(string.Format("c2 {0} should be less than 1", c2)); |
||||
|
|
||||
|
C1 = c1; |
||||
|
C2 = c2; |
||||
|
ParameterTolerance = parameterTolerance; |
||||
|
MaximumIterations = maxIterations; |
||||
|
} |
||||
|
|
||||
|
/// <summary>Implemented following http://www.math.washington.edu/~burke/crs/408/lectures/L9-weak-Wolfe.pdf</summary>
|
||||
|
/// <param name="startingPoint">The objective function being optimized, evaluated at the starting point of the search</param>
|
||||
|
/// <param name="searchDirection">Search direction</param>
|
||||
|
/// <param name="initialStep">Initial size of the step in the search direction</param>
|
||||
|
public LineSearchResult FindConformingStep(IObjectiveFunctionEvaluation startingPoint, Vector<double> searchDirection, double initialStep) |
||||
|
{ |
||||
|
return FindConformingStep(startingPoint, searchDirection, initialStep, double.PositiveInfinity); |
||||
|
} |
||||
|
|
||||
|
/// <summary></summary>
|
||||
|
/// <param name="startingPoint">The objective function being optimized, evaluated at the starting point of the search</param>
|
||||
|
/// <param name="searchDirection">Search direction</param>
|
||||
|
/// <param name="initialStep">Initial size of the step in the search direction</param>
|
||||
|
/// <param name="upperBound">The upper bound</param>
|
||||
|
public LineSearchResult FindConformingStep(IObjectiveFunctionEvaluation startingPoint, Vector<double> searchDirection, double initialStep, double upperBound) |
||||
|
{ |
||||
|
ValidateInputArguments(startingPoint, searchDirection, initialStep, upperBound); |
||||
|
|
||||
|
double lowerBound = 0.0; |
||||
|
double step = initialStep; |
||||
|
|
||||
|
double initialValue = startingPoint.Value; |
||||
|
Vector<double> initialGradient = startingPoint.Gradient; |
||||
|
|
||||
|
double initialDd = searchDirection * initialGradient; |
||||
|
|
||||
|
IObjectiveFunction objective = startingPoint.CreateNew(); |
||||
|
int ii; |
||||
|
MinimizationResult.ExitCondition reasonForExit = MinimizationResult.ExitCondition.None; |
||||
|
for (ii = 0; ii < MaximumIterations; ++ii) |
||||
|
{ |
||||
|
objective.EvaluateAt(startingPoint.Point + searchDirection * step); |
||||
|
ValidateGradient(objective); |
||||
|
ValidateValue(objective); |
||||
|
|
||||
|
double stepDd = searchDirection * objective.Gradient; |
||||
|
|
||||
|
if (objective.Value > initialValue + C1 * step * initialDd) |
||||
|
{ |
||||
|
upperBound = step; |
||||
|
step = 0.5 * (lowerBound + upperBound); |
||||
|
} |
||||
|
else if (WolfeCondition(stepDd,initialDd)) |
||||
|
{ |
||||
|
lowerBound = step; |
||||
|
step = double.IsPositiveInfinity(upperBound) ? 2 * lowerBound : 0.5 * (lowerBound + upperBound); |
||||
|
} |
||||
|
else |
||||
|
{ |
||||
|
reasonForExit = WolfeExitCondition; |
||||
|
break; |
||||
|
} |
||||
|
|
||||
|
if (!double.IsInfinity(upperBound)) |
||||
|
{ |
||||
|
double maxRelChange = 0.0; |
||||
|
for (int jj = 0; jj < objective.Point.Count; ++jj) |
||||
|
{ |
||||
|
double tmp = Math.Abs(searchDirection[jj] * (upperBound - lowerBound)) / Math.Max(Math.Abs(objective.Point[jj]), 1.0); |
||||
|
maxRelChange = Math.Max(maxRelChange, tmp); |
||||
|
} |
||||
|
if (maxRelChange < ParameterTolerance) |
||||
|
{ |
||||
|
reasonForExit = MinimizationResult.ExitCondition.LackOfProgress; |
||||
|
break; |
||||
|
} |
||||
|
} |
||||
|
} |
||||
|
|
||||
|
if (ii == MaximumIterations && Double.IsPositiveInfinity(upperBound)) |
||||
|
{ |
||||
|
throw new MaximumIterationsException(String.Format("Maximum iterations ({0}) reached. Function appears to be unbounded in search direction.", MaximumIterations)); |
||||
|
} |
||||
|
|
||||
|
if (ii == MaximumIterations) |
||||
|
{ |
||||
|
throw new MaximumIterationsException(String.Format("Maximum iterations ({0}) reached.", MaximumIterations)); |
||||
|
} |
||||
|
|
||||
|
return new LineSearchResult(objective, ii, step, reasonForExit); |
||||
|
} |
||||
|
protected abstract MinimizationResult.ExitCondition WolfeExitCondition { get; } |
||||
|
|
||||
|
protected abstract bool WolfeCondition(double stepDd, double initialDd); |
||||
|
|
||||
|
protected virtual void ValidateGradient(IObjectiveFunction objective) |
||||
|
{ |
||||
|
} |
||||
|
protected virtual void ValidateValue(IObjectiveFunction objective) |
||||
|
{ |
||||
|
} |
||||
|
|
||||
|
protected virtual void ValidateInputArguments(IObjectiveFunctionEvaluation startingPoint, Vector<double> searchDirection, double initialStep, double upperBound) |
||||
|
{ |
||||
|
|
||||
|
} |
||||
|
} |
||||
|
|
||||
|
|
||||
|
|
||||
|
} |
||||
@ -1,111 +0,0 @@ |
|||||
// <copyright file="WolfeRule.cs" company="Math.NET">
|
|
||||
// Math.NET Numerics, part of the Math.NET Project
|
|
||||
// http://numerics.mathdotnet.com
|
|
||||
// http://github.com/mathnet/mathnet-numerics
|
|
||||
// http://mathnetnumerics.codeplex.com
|
|
||||
//
|
|
||||
// Copyright (c) 2009-2015 Math.NET
|
|
||||
//
|
|
||||
// Permission is hereby granted, free of charge, to any person
|
|
||||
// obtaining a copy of this software and associated documentation
|
|
||||
// files (the "Software"), to deal in the Software without
|
|
||||
// restriction, including without limitation the rights to use,
|
|
||||
// copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
||||
// copies of the Software, and to permit persons to whom the
|
|
||||
// Software is furnished to do so, subject to the following
|
|
||||
// conditions:
|
|
||||
//
|
|
||||
// The above copyright notice and this permission notice shall be
|
|
||||
// included in all copies or substantial portions of the Software.
|
|
||||
//
|
|
||||
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
||||
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
|
|
||||
// OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
|
||||
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
|
|
||||
// HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
|
||||
// WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
|
||||
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
|
||||
// OTHER DEALINGS IN THE SOFTWARE.
|
|
||||
// </copyright>
|
|
||||
|
|
||||
using System; |
|
||||
using MathNet.Numerics.LinearAlgebra; |
|
||||
|
|
||||
namespace MathNet.Numerics.Optimization.LineSearch |
|
||||
{ |
|
||||
/// <summary>
|
|
||||
/// Performs an inexact line search. This is used as a part of quasi-Newton optimization methods to figure
|
|
||||
/// out how far to move along a certain gradient.
|
|
||||
/// See http://en.wikipedia.org/wiki/Wolfe_conditions
|
|
||||
/// Inspired by implementation: https://github.com/PatWie/CppNumericalSolvers/blob/master/src/linesearch/WolfeRule.h
|
|
||||
/// </summary>
|
|
||||
internal static class WolfeRule |
|
||||
{ |
|
||||
/// <summary>
|
|
||||
/// Searches along a line to satisfy the Wolfe conditions (inexact search for minimum)
|
|
||||
/// </summary>
|
|
||||
/// <param name="x0">Starting point of search</param>
|
|
||||
/// <param name="z">Search direction</param>
|
|
||||
/// <param name="functionValue">Evaluates the function being minimized</param>
|
|
||||
/// <param name="functionGradient">Evaluates the gradient of the function</param>
|
|
||||
/// <param name="alphaInit">Initial value for the coefficient of z (distance to travel in z direction)</param>
|
|
||||
/// <returns></returns>
|
|
||||
public static double LineSearch( |
|
||||
Vector<double> x0, |
|
||||
Vector<double> z, |
|
||||
Func<Vector<double>, double> functionValue, |
|
||||
Func<Vector<double>, Vector<double>> functionGradient, |
|
||||
float alphaInit = 1) |
|
||||
{ |
|
||||
Vector<double> x = x0; |
|
||||
|
|
||||
// evaluate phi(0)
|
|
||||
double phi0 = functionValue(x0); |
|
||||
|
|
||||
// evaluate phi'(0)
|
|
||||
Vector<double> grad = functionGradient(x); |
|
||||
double phi0_dash = z * grad; |
|
||||
|
|
||||
double alpha = alphaInit; |
|
||||
|
|
||||
bool decrease_direction = true; |
|
||||
|
|
||||
// 200 guesses max
|
|
||||
for (int iter = 0; iter < 200; ++iter) { |
|
||||
|
|
||||
// new guess for phi(alpha)
|
|
||||
Vector<double> x_candidate = x + alpha * z; |
|
||||
double phi = functionValue(x_candidate); |
|
||||
|
|
||||
// decrease condition invalid --> shrink interval
|
|
||||
if (phi > phi0 + 0.0001 * alpha * phi0_dash) |
|
||||
{ |
|
||||
alpha *= 0.5; |
|
||||
decrease_direction = false; |
|
||||
} |
|
||||
else |
|
||||
{ |
|
||||
// valid decrease --> test strong wolfe condition
|
|
||||
Vector<double> grad2 = functionGradient(x_candidate); |
|
||||
double phi_dash = z * grad2; |
|
||||
|
|
||||
// curvature condition invalid ?
|
|
||||
if ((phi_dash < 0.9 * phi0_dash) || !decrease_direction) { |
|
||||
// increase interval
|
|
||||
alpha *= 4.0; |
|
||||
} |
|
||||
else { |
|
||||
// both condition are valid --> we are happy
|
|
||||
x = x_candidate; |
|
||||
grad = grad2; |
|
||||
phi0 = phi; |
|
||||
return alpha; |
|
||||
} |
|
||||
} |
|
||||
} |
|
||||
|
|
||||
|
|
||||
return alpha; |
|
||||
} |
|
||||
} |
|
||||
} |
|
||||
Loading…
Reference in new issue