Changeset 11583

Timestamp:

11/25/14 13:46:50 (10 years ago)

Author:

pfleck

Message:

#2269

• Implemented MatingPoolCreator.
• Added a modified GeneticAlgorithMainLoop as main operator in ALPS-GA-MainLoop.

Location:

branches/ALPS/HeuristicLab.Algorithms.ALPS/3.3

Files:

• AlpsGeneticAlgorithm.cs (modified) (2 diffs)
• AlpsGeneticAlgorithmMainLoop.cs (modified) (11 diffs)
• HeuristicLab.Algorithms.ALPS-3.3.csproj (modified) (2 diffs)
• MatingPoolCreator.cs (added)
• Plugin.cs.frame (modified) (1 diff)

branches/ALPS/HeuristicLab.Algorithms.ALPS/3.3/AlpsGeneticAlgorithm.cs

@@ -39 +39 @@
   [Creatable("Algorithms")]
   [StorableClass]
-  public class AlpsGeneticAlgorithm : HeuristicOptimizationEngineAlgorithm, IStorableContent {
+  public sealed class AlpsGeneticAlgorithm : HeuristicOptimizationEngineAlgorithm, IStorableContent {
     public string Filename { get; set; }
 
@@ -371 +371 @@
     }
     private void ParameterizeMainLoop() {
-      MainLoop.BestKnownQualityParameter.ActualName = Problem.BestKnownQualityParameter.Name;
-      MainLoop.EvaluatorParameter.ActualName = Problem.EvaluatorParameter.Name;
-      MainLoop.MaximizationParameter.ActualName = Problem.MaximizationParameter.Name;
-      MainLoop.BestKnownQualityParameter.ActualName = Problem.Evaluator.QualityParameter.ActualName;
+      //MainLoop.BestKnownQualityParameter.ActualName = Problem.BestKnownQualityParameter.Name;
+      //MainLoop.EvaluatorParameter.ActualName = Problem.EvaluatorParameter.Name;
+      //MainLoop.MaximizationParameter.ActualName = Problem.MaximizationParameter.Name;
+      //MainLoop.QualityParameter.ActualName = Problem.Evaluator.QualityParameter.ActualName;
+      MainLoop.MainOperator.EvaluatorParameter.ActualName = Problem.EvaluatorParameter.Name;
+      MainLoop.MainOperator.MaximizationParameter.ActualName = Problem.MaximizationParameter.Name;
+      MainLoop.MainOperator.QualityParameter.ActualName = Problem.Evaluator.QualityParameter.ActualName;
     }
     private void ParameterizeSelectors() {

branches/ALPS/HeuristicLab.Algorithms.ALPS/3.3/AlpsGeneticAlgorithmMainLoop.cs

@@ -20 +20 @@
 #endregion
 
+using System.Linq;
+using HeuristicLab.Algorithms.GeneticAlgorithm;
 using HeuristicLab.Common;
 using HeuristicLab.Core;
@@ -28 +30 @@
 using HeuristicLab.Parameters;
 using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
+using HeuristicLab.Selection;
 
 namespace HeuristicLab.Algorithms.ALPS {
 
   [Item("AlpsGeneticAlgorithmMainLoop", "An ALPS genetic algorithm main loop operator.")]
-  public class AlpsGeneticAlgorithmMainLoop : AlgorithmOperator {
+  public sealed class AlpsGeneticAlgorithmMainLoop : AlgorithmOperator {
     #region Parameter Properties
     public ILookupParameter<IRandom> RandomParameter {
       get { return (ILookupParameter<IRandom>)Parameters["Random"]; }
     }
-    public ILookupParameter<BoolValue> MaximizationParameter {
+    /*public ILookupParameter<BoolValue> MaximizationParameter {
       get { return (ILookupParameter<BoolValue>)Parameters["Maximization"]; }
     }
@@ -46 +49 @@
       get { return (ILookupParameter<DoubleValue>)Parameters["BestKnownQuality"]; }
     }
+    public ILookupParameter<IOperator> EvaluatorParameter {
+      get { return (ILookupParameter<IOperator>)Parameters["Evaluator"]; }
+    }*/
     public ILookupParameter<IntValue> PopulationSizeParameter {
       get { return (ILookupParameter<IntValue>)Parameters["PopulationSize"]; }
@@ -64 +70 @@
       get { return (ILookupParameter<IOperator>)Parameters["Mutator"]; }
     }
-    public ILookupParameter<IOperator> EvaluatorParameter {
-      get { return (ILookupParameter<IOperator>)Parameters["Evaluator"]; }
-    }
     public ILookupParameter<IntValue> ElitesParameter {
       get { return (ILookupParameter<IntValue>)Parameters["Elites"]; }
@@ -83 +86 @@
     }
     #endregion
+
+    public GeneticAlgorithmMainLoop MainOperator {
+      get { return OperatorGraph.Iterate().OfType<GeneticAlgorithmMainLoop>().First(); }
+    }
 
     [StorableConstructor]
@@ -95 +102 @@
       : base() {
       Parameters.Add(new LookupParameter<IRandom>("Random", "A pseudo random number generator."));
-      Parameters.Add(new LookupParameter<BoolValue>("Maximization", "True if the problem is a maximization problem, otherwise false."));
+      /*Parameters.Add(new LookupParameter<BoolValue>("Maximization", "True if the problem is a maximization problem, otherwise false."));
       Parameters.Add(new ScopeTreeLookupParameter<DoubleValue>("Quality", "The value which represents the quality of a solution."));
       Parameters.Add(new LookupParameter<DoubleValue>("BestKnownQuality", "The best known quality value found so far."));
+      Parameters.Add(new LookupParameter<IOperator>("Evaluator", "The operator used to evaluate solutions."));*/
       Parameters.Add(new LookupParameter<IntValue>("PopulationSize", "The size of the population of solutions."));
       Parameters.Add(new LookupParameter<IntValue>("MaximumGenerations", "The maximum number of generations that the algorithm should process."));
@@ -104 +112 @@
       Parameters.Add(new LookupParameter<PercentValue>("MutationProbability", "The probability that the mutation operator is applied on a solution."));
       Parameters.Add(new LookupParameter<IOperator>("Mutator", "The operator used to mutate solutions."));
-      Parameters.Add(new LookupParameter<IOperator>("Evaluator", "The operator used to evaluate solutions."));
       Parameters.Add(new LookupParameter<IntValue>("Elites", "The numer of elite solutions which are kept in each generation."));
       Parameters.Add(new LookupParameter<BoolValue>("ReevaluateElites", "Flag to determine if elite individuals should be reevaluated (i.e., if stochastic fitness functions are used.)"));
@@ -111 +118 @@
       Parameters.Add(new LookupParameter<IOperator>("LayerAnalyzer", "The operator used to analyze each layer."));
 
-
       var variableCreator = new VariableCreator() { Name = "Initialize" };
       var resultsCollector = new ResultsCollector();
@@ -117 +123 @@
       var initLayerAnalyzerProcessor = new SubScopesProcessor();
       var initLayerAnalyzerPlaceholder = new Placeholder() { Name = "LayerAnalyzer (Placeholder)" };
-      var matingPoolCreator = new CombinedOperator() { Name = "Create Mating Pools" };
+      var matingPoolCreator = new MatingPoolCreator() { Name = "Create Mating Pools" };
       var matingPoolProcessor = new UniformSubScopesProcessor();
-      var mainOperator = new CombinedOperator() { Name = "Perform Generation" };
+      var mainOperator = PrepareGeneticAlgorithmMainLoop();
       var layerAnalyzerPlaceholder = new Placeholder() { Name = "LayerAnalyzer (Placeholder)" };
+      var generationsIcrementor = new IntCounter() { Name = "Increment Generations" };
+      var evaluatedSolutionsReducer = new DataReducer() { Name = "Increment EvaluatedSolutions" };
       var eldersEmigrator = new CombinedOperator() { Name = "Emigrate Elders" };
       var layerUpdator = new CombinedOperator() { Name = "Update Layers" };
@@ -150 +158 @@
       matingPoolProcessor.Parallel.Value = true;
       matingPoolProcessor.Operator = mainOperator;
-      matingPoolProcessor.Successor = eldersEmigrator;
+      matingPoolProcessor.Successor = generationsIcrementor;
+
+      generationsIcrementor.ValueParameter.ActualName = "Generations";
+      generationsIcrementor.Increment = new IntValue(1);
+      generationsIcrementor.Successor = evaluatedSolutionsReducer;
+
+      evaluatedSolutionsReducer.ParameterToReduce.ActualName = "EvaluatedSolutions";
+      evaluatedSolutionsReducer.TargetParameter.ActualName = "EvaluatedSolutions";
+      evaluatedSolutionsReducer.ReductionOperation.Value = new ReductionOperation(ReductionOperations.Sum);
+      evaluatedSolutionsReducer.TargetOperation.Value = new ReductionOperation(ReductionOperations.Sum);
+      evaluatedSolutionsReducer.Successor = eldersEmigrator;
 
       mainOperator.Successor = layerAnalyzerPlaceholder;
@@ -170 +188 @@
       generationsComparator.Successor = terminateBranch;
 
-      terminateBranch.ConditionParameter.ActualName = "Terminategenerations";
+      terminateBranch.ConditionParameter.ActualName = "TerminateGenerations";
       terminateBranch.FalseBranch = matingPoolCreator;
-
-    }
-
+    }
+
+    private GeneticAlgorithmMainLoop PrepareGeneticAlgorithmMainLoop() {
+      var mainLoop = new GeneticAlgorithmMainLoop();
+      var selector = mainLoop.OperatorGraph.Iterate().OfType<Placeholder>().First(o => o.OperatorParameter.ActualName == "Selector");
+      var crossover = mainLoop.OperatorGraph.Iterate().OfType<Placeholder>().First(o => o.OperatorParameter.ActualName == "Crossover");
+      var elitesMerger = mainLoop.OperatorGraph.Iterate().OfType<MergingReducer>().First();
+
+      // Operator starts with selector
+      mainLoop.OperatorGraph.InitialOperator = selector;
+
+      // Insert AgeCalculator between crossover and its successor
+      var crossoverSuccessor = crossover.Successor;
+      var ageCalculator = new DataReducer() { Name = "Calculate Age" };
+      ageCalculator.ParameterToReduce.ActualName = "Age";
+      ageCalculator.TargetParameter.ActualName = "Age";
+      ageCalculator.ReductionOperation.Value = new ReductionOperation(ReductionOperations.Max);
+      ageCalculator.TargetOperation.Value = new ReductionOperation(ReductionOperations.Assign);
+      crossover.Successor = ageCalculator;
+      ageCalculator.Successor = crossoverSuccessor;
+
+      // Instead of generational loop after merging of elites, increment ages of all individuals
+      var processor = new UniformSubScopesProcessor();
+      var incrementor = new IntCounter() { Name = "Increment Age" };
+      processor.Operator = incrementor;
+      processor.Successor = null;
+      incrementor.ValueParameter.ActualName = "Age";
+      incrementor.Increment = new IntValue(1);
+      incrementor.Successor = null;
+      elitesMerger.Successor = processor;
+
+      // Parameterize
+      foreach (var stochasticOperator in mainLoop.OperatorGraph.Iterate().OfType<IStochasticOperator>())
+        stochasticOperator.RandomParameter.ActualName = "LocalRandom";
+      foreach (var stochasticBranch in mainLoop.OperatorGraph.Iterate().OfType<StochasticBranch>())
+        stochasticBranch.RandomParameter.ActualName = "LocalRandom";
+
+      // Remove unnessesary subtrees
+      //foreach (var @operator in mainLoop.OperatorGraph.Iterate().OfType<SingleSuccessorOperator>().Where(o => o.Successor == selector))
+      //  @operator.Successor = null;
+
+      return mainLoop;
+    }
   }
 }

branches/ALPS/HeuristicLab.Algorithms.ALPS/3.3/HeuristicLab.Algorithms.ALPS-3.3.csproj

@@ -81 +81 @@
     <Compile Include="AlpsGeneticAlgorithm.cs" />
     <Compile Include="AlpsGeneticAlgorithmMainLoop.cs" />
+    <Compile Include="MatingPoolCreator.cs" />
     <Compile Include="Plugin.cs" />
     <Compile Include="Properties\AssemblyInfo.cs" />
@@ -90 +91 @@
   </ItemGroup>
   <ItemGroup>
+    <ProjectReference Include="..\..\HeuristicLab.Algorithms.GeneticAlgorithm\3.3\HeuristicLab.Algorithms.GeneticAlgorithm-3.3.csproj">
+      <Project>{a51da44f-cb35-4f6f-99f5-2a2e904ab93b}</Project>
+      <Name>HeuristicLab.Algorithms.GeneticAlgorithm-3.3</Name>
+    </ProjectReference>
     <ProjectReference Include="..\..\HeuristicLab.Analysis\3.3\HeuristicLab.Analysis-3.3.csproj">
       <Project>{887425b4-4348-49ed-a457-b7d2c26ddbf9}</Project>

branches/ALPS/HeuristicLab.Algorithms.ALPS/3.3/Plugin.cs.frame

@@ -40 +40 @@
   [PluginDependency("HeuristicLab.Random", "3.3")]
   [PluginDependency("HeuristicLab.Selection", "3.3")]
+  [PluginDependency("HeuristicLab.Algorithms.GeneticAlgorithm", "3.3")]
   public class HeuristicLabAlgorithmsALPSPlugin : PluginBase {
   }