public override IOperation Apply()
{
ItemArray <RealVector> realVectors = RealVectorParameter.ActualValue;
ItemArray <DoubleValue> qualities = QualityParameter.ActualValue;
bool max = MaximizationParameter.ActualValue.Value;
DoubleValue bestKnownQuality = BestKnownQualityParameter.ActualValue;
SingleObjectiveTestFunctionSolution solution = BestSolutionParameter.ActualValue;
int i = -1;
if (!max)
{
i = qualities.Select((x, index) => new { index, x.Value }).OrderBy(x => x.Value).First().index;
}
else
{
i = qualities.Select((x, index) => new { index, x.Value }).OrderByDescending(x => x.Value).First().index;
}
if (bestKnownQuality == null ||
max && qualities[i].Value > bestKnownQuality.Value ||
!max && qualities[i].Value < bestKnownQuality.Value)
{
BestKnownQualityParameter.ActualValue = new DoubleValue(qualities[i].Value);
BestKnownSolutionParameter.ActualValue = (RealVector)realVectors[i].Clone();
if (solution != null)
{
solution.BestKnownRealVector = BestKnownSolutionParameter.ActualValue;
}
}
if (solution == null)
{
ResultCollection results = ResultsParameter.ActualValue;
solution = new SingleObjectiveTestFunctionSolution((RealVector)realVectors[i].Clone(),
(DoubleValue)qualities[i].Clone(),
EvaluatorParameter.ActualValue);
solution.Population = realVectors[i].Length == 2
? new ItemArray <RealVector>(realVectors.Select(x => x.Clone()).Cast <RealVector>())
: null;
solution.BestKnownRealVector = BestKnownSolutionParameter.ActualValue;
solution.Bounds = BoundsParameter.ActualValue;
BestSolutionParameter.ActualValue = solution;
results.Add(new Result("Best Solution", solution));
}
else
{
if (max && qualities[i].Value > solution.BestQuality.Value ||
!max && qualities[i].Value < solution.BestQuality.Value)
{
solution.BestRealVector = (RealVector)realVectors[i].Clone();
solution.BestQuality = (DoubleValue)qualities[i].Clone();
}
solution.Population = realVectors[i].Length == 2
? new ItemArray <RealVector>(realVectors.Select(x => x.Clone()).Cast <RealVector>())
: null;
}
return(base.Apply());
}
protected SingleObjectiveTestFunctionSolution(SingleObjectiveTestFunctionSolution original, Cloner cloner)
: base(original, cloner)
{
bestKnownRealVector = cloner.Clone(original.bestKnownRealVector);
bestRealVector = cloner.Clone(original.bestRealVector);
bestQuality = cloner.Clone(original.bestQuality);
population = cloner.Clone(original.population);
evaluator = cloner.Clone(original.evaluator);
bounds = cloner.Clone(original.bounds);
Initialize();
}
public override IOperation Apply() {
ItemArray<RealVector> realVectors = RealVectorParameter.ActualValue;
ItemArray<DoubleValue> qualities = QualityParameter.ActualValue;
bool max = MaximizationParameter.ActualValue.Value;
DoubleValue bestKnownQuality = BestKnownQualityParameter.ActualValue;
SingleObjectiveTestFunctionSolution solution = BestSolutionParameter.ActualValue;
int i = -1;
if (!max) i = qualities.Select((x, index) => new { index, x.Value }).OrderBy(x => x.Value).First().index;
else i = qualities.Select((x, index) => new { index, x.Value }).OrderByDescending(x => x.Value).First().index;
if (bestKnownQuality == null ||
max && qualities[i].Value > bestKnownQuality.Value
|| !max && qualities[i].Value < bestKnownQuality.Value) {
BestKnownQualityParameter.ActualValue = new DoubleValue(qualities[i].Value);
BestKnownSolutionParameter.ActualValue = (RealVector)realVectors[i].Clone();
if (solution != null)
solution.BestKnownRealVector = BestKnownSolutionParameter.ActualValue;
}
if (solution == null) {
ResultCollection results = ResultsParameter.ActualValue;
solution = new SingleObjectiveTestFunctionSolution((RealVector)realVectors[i].Clone(),
(DoubleValue)qualities[i].Clone(),
EvaluatorParameter.ActualValue);
solution.Population = realVectors[i].Length == 2
? new ItemArray<RealVector>(realVectors.Select(x => x.Clone()).Cast<RealVector>())
: null;
solution.BestKnownRealVector = BestKnownSolutionParameter.ActualValue;
solution.Bounds = BoundsParameter.ActualValue;
BestSolutionParameter.ActualValue = solution;
results.Add(new Result("Best Solution", solution));
} else {
if (max && qualities[i].Value > solution.BestQuality.Value
|| !max && qualities[i].Value < solution.BestQuality.Value) {
solution.BestRealVector = (RealVector)realVectors[i].Clone();
solution.BestQuality = (DoubleValue)qualities[i].Clone();
}
solution.Population = realVectors[i].Length == 2
? new ItemArray<RealVector>(realVectors.Select(x => x.Clone()).Cast<RealVector>())
: null;
}
return base.Apply();
}
protected SingleObjectiveTestFunctionSolution(SingleObjectiveTestFunctionSolution original, Cloner cloner)
: base(original, cloner) {
bestKnownRealVector = cloner.Clone(original.bestKnownRealVector);
bestRealVector = cloner.Clone(original.bestRealVector);
bestQuality = cloner.Clone(original.bestQuality);
population = cloner.Clone(original.population);
evaluator = cloner.Clone(original.evaluator);
bounds = cloner.Clone(original.bounds);
Initialize();
}
