Changeset 7740 for branches/ScatterSearch/HeuristicLab.Algorithms.ScatterSearch/3.3/SolutionPoolUpdateMethod.cs

Timestamp:

04/18/12 19:01:21 (12 years ago)

Author:

jkarder

Message:

#1331:

• added custom crossover operator (NChildCrossover)
• added parameters and adjusted types
• replaced SolutionCombinationMethod with a placeholder
• adjusted event handling
• changed access levels
• minor code improvements

File:

• branches/ScatterSearch/HeuristicLab.Algorithms.ScatterSearch/3.3/SolutionPoolUpdateMethod.cs (modified) (5 diffs)

branches/ScatterSearch/HeuristicLab.Algorithms.ScatterSearch/3.3/SolutionPoolUpdateMethod.cs

@@ -20 +20 @@
 #endregion
 
+using System;
+using System.Collections.Generic;
 using System.Linq;
 using HeuristicLab.Common;
@@ -36 +38 @@
   public sealed class SolutionPoolUpdateMethod : SingleSuccessorOperator {
     #region Parameter properties
-    private ScopeParameter CurrentScopeParameter {
+    public ScopeParameter CurrentScopeParameter {
       get { return (ScopeParameter)Parameters["CurrentScope"]; }
     }
-    private ValueLookupParameter<BoolValue> NewSolutionsParameter {
-      get { return (ValueLookupParameter<BoolValue>)Parameters["NewSolutions"]; }
+    public IValueLookupParameter<BoolValue> NewSolutionsParameter {
+      get { return (IValueLookupParameter<BoolValue>)Parameters["NewSolutions"]; }
     }
-    private ValueLookupParameter<IntValue> ReferenceSetSizeParameter {
-      get { return (ValueLookupParameter<IntValue>)Parameters["ReferenceSetSize"]; }
+    public IValueLookupParameter<IntValue> ReferenceSetSizeParameter {
+      get { return (IValueLookupParameter<IntValue>)Parameters["ReferenceSetSize"]; }
+    }
+    public IValueLookupParameter<IItem> QualityParameter {
+      get { return (IValueLookupParameter<IItem>)Parameters["Quality"]; }
+    }
+    public IValueLookupParameter<IItem> SolutionParameter {
+      get { return (IValueLookupParameter<IItem>)Parameters["Solution"]; }
     }
     #endregion
@@ -58 +66 @@
       set { ReferenceSetSizeParameter.ActualValue = value; }
     }
+    private IItem Quality {
+      get { return QualityParameter.ActualValue; }
+    }
     #endregion
 
@@ -71 +82 @@
     private void Initialize() {
       #region Create parameters
-      Parameters.Add(new ScopeParameter("CurrentScope", "The current scope to which the new solutions are added as sub-scopes."));
-      Parameters.Add(new ValueLookupParameter<BoolValue>("NewSolutions", "Indicates if new solutions have been found."));
-      Parameters.Add(new ValueLookupParameter<IntValue>("ReferenceSetSize", "The size of the reference set."));
+      Parameters.Add(new ScopeParameter("CurrentScope"));
+      Parameters.Add(new ValueLookupParameter<BoolValue>("NewSolutions"));
+      Parameters.Add(new ValueLookupParameter<IntValue>("ReferenceSetSize"));
+      Parameters.Add(new ValueLookupParameter<IItem>("Quality"));
+      Parameters.Add(new ValueLookupParameter<IItem>("Solution"));
       #endregion
-
-      #region Create operators
-      #endregion
-
-      #region Create operator graph
-      #endregion
+      SolutionParameter.ActualName = "KnapsackSolution"; // temporary solution for the knapsack problem
     }
 
@@ -91 +99 @@
       }
       CurrentScope.SubScopes.Clear();
-      CurrentScope.SubScopes.AddRange(parents.SubScopes.OrderByDescending(o => o.Variables["Quality"].Value));
-      if ((offspring.SubScopes.OrderByDescending(o => o.Variables["Quality"].Value).First().Variables["Quality"].Value as DoubleValue).Value
-          > (parents.SubScopes.OrderByDescending(o => o.Variables["Quality"].Value).First().Variables["Quality"].Value as DoubleValue).Value) {
-        CurrentScope.SubScopes.Replace(CurrentScope.SubScopes.Union(offspring.SubScopes).OrderByDescending(o => o.Variables["Quality"].Value).Take(ReferenceSetSize.Value));
+      CurrentScope.SubScopes.AddRange(parents.SubScopes.OrderByDescending(o => o.Variables[QualityParameter.ActualName].Value));
+      if ((offspring.SubScopes.OrderByDescending(o => o.Variables[QualityParameter.ActualName].Value).First().Variables[QualityParameter.ActualName].Value as DoubleValue).Value
+          > (parents.SubScopes.OrderByDescending(o => o.Variables[QualityParameter.ActualName].Value).Last().Variables[QualityParameter.ActualName].Value as DoubleValue).Value) {
+        CurrentScope.SubScopes.Replace(parents.SubScopes.Concat(offspring.SubScopes.Distinct(new KeyEqualityComparer<IScope>(x => x.Variables[SolutionParameter.ActualName].Value.ToString()))).OrderByDescending(o => o.Variables[QualityParameter.ActualName].Value).Take(ReferenceSetSize.Value));
         NewSolutions.Value = true;
       }
+
       return base.Apply();
+    }
+
+    private class KeyEqualityComparer<T> : IEqualityComparer<T> {
+      private readonly Func<T, object> keyExtractor;
+
+      public KeyEqualityComparer(Func<T, object> keyExtractor) {
+        this.keyExtractor = keyExtractor;
+      }
+
+      public bool Equals(T x, T y) {
+        return keyExtractor(x).Equals(keyExtractor(y));
+      }
+
+      public int GetHashCode(T obj) {
+        return keyExtractor(obj).GetHashCode();
+      }
     }
   }