Changeset 9077 for branches/DataAnalysis.IslandAlgorithms/HeuristicLab.Algorithms.DataAnalysis.Symbolic/3.3/SymbolicDataAnalysisIslandGeneticAlgorithm.cs

Timestamp:

12/19/12 10:33:27 (12 years ago)

Author:

mkommend

Message:

#1997: Added first working version of SymbolicDataAnalysisIslandGA.

File:

• branches/DataAnalysis.IslandAlgorithms/HeuristicLab.Algorithms.DataAnalysis.Symbolic/3.3/SymbolicDataAnalysisIslandGeneticAlgorithm.cs (modified) (5 diffs)

branches/DataAnalysis.IslandAlgorithms/HeuristicLab.Algorithms.DataAnalysis.Symbolic/3.3/SymbolicDataAnalysisIslandGeneticAlgorithm.cs

@@ -27 +27 @@
 using HeuristicLab.Core;
 using HeuristicLab.Data;
+using HeuristicLab.Optimization;
 using HeuristicLab.Parameters;
 using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
+using HeuristicLab.Problems.DataAnalysis;
 using HeuristicLab.Problems.DataAnalysis.Symbolic;
+using HeuristicLab.Random;
 
 namespace HeuristicLab.Algorithms.DataAnalysis.Symbolic {
@@ -37 +40 @@
   public sealed class SymbolicDataAnalysisIslandGeneticAlgorithm : IslandGeneticAlgorithm {
     private const string FixedSamplesParameterName = "NumberOfFixedSamples";
+    private const string FixedSamplesPartitionParameterName = "FixedSamplesPartition";
     private const string FixedSamplesPartitionsParameterName = "FixedSamplesPartitions";
     private const string RandomSamplesParameterName = "NumberOfRandomSamples";
+    private const string EvaluatorParameterName = "IslandEvaluator";
+    private const string ProblemEvaluatorParameterName = "ProblemEvaluator";
 
     #region Problem Properties
@@ -59 +65 @@
     public IFixedValueParameter<IntValue> RandomSamplesParameter {
       get { return (IFixedValueParameter<IntValue>)Parameters[RandomSamplesParameterName]; }
+    }
+    public IValueParameter<ISymbolicDataAnalysisIslandGAEvaluator> EvaluatorParameter {
+      get { return (IValueParameter<ISymbolicDataAnalysisIslandGAEvaluator>)Parameters[EvaluatorParameterName]; }
+    }
+    private ILookupParameter<ISingleObjectiveEvaluator> ProblemEvaluatorParameter {
+      get { return (ILookupParameter<ISingleObjectiveEvaluator>)Parameters[ProblemEvaluatorParameterName]; }
     }
     #endregion
@@ -95 +107 @@
       Parameters.Add(new FixedValueParameter<IntValue>(FixedSamplesParameterName, "The number of fixed samples used for fitness calculation in each island.", new IntValue(0)));
       Parameters.Add(new ValueParameter<ItemArray<IntRange>>(FixedSamplesPartitionsParameterName, "The fixed samples partitions used for fitness calculation for every island."));
-      Parameters.Add(new FixedValueParameter<IntValue>(RandomSamplesParameterName, "The number of random samples used for fitness calculation in each island..", new IntValue(0)));
+      Parameters.Add(new FixedValueParameter<IntValue>(RandomSamplesParameterName, "The number of random samples used for fitness calculation in each island.", new IntValue(0)));
+      Parameters.Add(new OptionalValueParameter<ISymbolicDataAnalysisIslandGAEvaluator>(EvaluatorParameterName, "The evaluator of the algorithm."));
+      Parameters.Add(new LookupParameter<ISingleObjectiveEvaluator>(ProblemEvaluatorParameterName, "Internal parameter for name translation", "Evaluator"));
+
+      ScopeTreeAssigner<IntRange> fixedSamplesPartitionCreator = new ScopeTreeAssigner<IntRange>();
+      fixedSamplesPartitionCreator.LeftSideParameter.ActualName = FixedSamplesPartitionParameterName;
+      fixedSamplesPartitionCreator.RightSideParameter.ActualName = FixedSamplesPartitionsParameterName;
+
+      RandomCreator insertionPoint = OperatorGraph.Iterate().OfType<RandomCreator>().Skip(1).First();
+      fixedSamplesPartitionCreator.Successor = insertionPoint.Successor;
+      insertionPoint.Successor = fixedSamplesPartitionCreator;
 
       RegisterParameterEvents();
       RecalculateFixedSamplesPartitions();
+    }
+
+    protected override void Problem_EvaluatorChanged(object sender, EventArgs e) {
+      ParameterizeProblemEvaluator();
+      base.Problem_EvaluatorChanged(sender, e);
+    }
+
+    private void ParameterizeProblemEvaluator() {
+      var regresssionEvaluator = Problem.Evaluator as ISymbolicDataAnalysisEvaluator<IRegressionProblemData>;
+      if (regresssionEvaluator != null) {
+        regresssionEvaluator.EvaluationPartitionParameter.ActualName = FixedSamplesPartitionParameterName;
+      }
+      var classificationEvaluator = Problem.Evaluator as ISymbolicDataAnalysisEvaluator<IClassificationProblemData>;
+      if (classificationEvaluator != null) {
+        classificationEvaluator.EvaluationPartitionParameter.ActualName = FixedSamplesPartitionParameterName;
+      }
+    }
+
+    protected override void ParameterizeSolutionsCreator() {
+      base.ParameterizeSolutionsCreator();
+      SolutionsCreator.EvaluatorParameter.ActualName = EvaluatorParameterName;
+    }
+
+    protected override void ParameterizeMainLoop() {
+      base.ParameterizeMainLoop();
+      MainLoop.EvaluatorParameter.ActualName = EvaluatorParameterName;
+      MainLoop.QualityParameter.ActualName = EvaluatorParameter.Value.QualityParameter.ActualName;
     }
 
@@ -114 +163 @@
     protected override void Problem_Reset(object sender, EventArgs e) {
       RecalculateFixedSamplesPartitions();
+      ParameterizeProblemEvaluator();
       base.Problem_Reset(sender, e);
     }
 
     protected override void OnProblemChanged() {
+      Problem.FitnessCalculationPartition.ValueChanged += (o, e) => RecalculateFixedSamplesPartitions();
+
+      ParameterizeProblemEvaluator();
+      if (Problem is IRegressionProblem) {
+        var evaluator = new SymbolicDataAnalysisIslandGAEvaluator<IRegressionProblemData>();
+        evaluator.FixedSamplesParameter.ActualName = FixedSamplesParameterName;
+        evaluator.RandomSamplesParameter.ActualName = RandomSamplesParameterName;
+        EvaluatorParameter.Value = evaluator;
+      } else if (Problem is IClassificationProblem) {
+        var evaluator = new SymbolicDataAnalysisIslandGAEvaluator<IClassificationProblemData>();
+        evaluator.FixedSamplesParameter.ActualName = FixedSamplesParameterName;
+        evaluator.RandomSamplesParameter.ActualName = RandomSamplesParameterName;
+        EvaluatorParameter.Value = evaluator;
+      } else
+        EvaluatorParameter.Value = null;
+
+      ParameterizeStochasticOperatorForIsland(EvaluatorParameter.Value);
+
+      RecalculateFixedSamplesPartitions();
       base.OnProblemChanged();
-      Problem.FitnessCalculationPartition.ValueChanged += (o, e) => RecalculateFixedSamplesPartitions();
-      RecalculateFixedSamplesPartitions();
     }