Changeset 12743 for trunk/sources/HeuristicLab.Tests/HeuristicLab-3.3/Samples

Timestamp:

07/11/15 20:27:00 (9 years ago)

Author:

abeham

Message:

#2427:

• Added grouping problem sample as Test
• Added .hl file to Optimizers
• Adapated StartPage
• Changed MultiLLEManipulator to enable all manipulators by default

File:

• trunk/sources/HeuristicLab.Tests/HeuristicLab-3.3/Samples/GAGroupingProblemSampleTest.cs (copied) (copied from trunk/sources/HeuristicLab.Tests/HeuristicLab-3.3/Samples/GATspSampleTest.cs) (3 diffs)

trunk/sources/HeuristicLab.Tests/HeuristicLab-3.3/Samples/GAGroupingProblemSampleTest.cs

@@ -21 +21 @@
 
 using System.IO;
-using System.Linq;
 using HeuristicLab.Algorithms.GeneticAlgorithm;
-using HeuristicLab.Encodings.PermutationEncoding;
+using HeuristicLab.Encodings.LinearLinkageEncoding;
 using HeuristicLab.Persistence.Default.Xml;
-using HeuristicLab.Problems.Instances.TSPLIB;
-using HeuristicLab.Problems.TravelingSalesman;
+using HeuristicLab.Problems.Programmable;
 using HeuristicLab.Selection;
 using Microsoft.VisualStudio.TestTools.UnitTesting;
@@ -32 +30 @@
 namespace HeuristicLab.Tests {
   [TestClass]
-  public class GATspSampleTest {
-    private const string SampleFileName = "GA_TSP";
+  public class GAGroupingProblemSampleTest {
+    private const string SampleFileName = "GA_Grouping";
+    #region Code
+    private const string ProblemCode = @"
+using System;
+using System.Linq;
+using System.Collections.Generic;
+using HeuristicLab.Common;
+using HeuristicLab.Core;
+using HeuristicLab.Data;
+using HeuristicLab.Encodings.LinearLinkageEncoding;
+using HeuristicLab.Optimization;
+using HeuristicLab.Problems.Programmable;
+
+namespace HeuristicLab.Problems.Programmable {
+  public class CompiledSingleObjectiveProblemDefinition : CompiledProblemDefinition, ISingleObjectiveProblemDefinition {
+    private const int ProblemSize = 100;
+    public bool Maximization { get { return false; } }
+
+    private bool[,] allowedTogether;
+      
+    public override void Initialize() {
+      var encoding = new LinearLinkageEncoding(""lle"", length: ProblemSize);
+      allowedTogether = new bool[encoding.Length, encoding.Length];
+      var random = new System.Random(13);
+      for (var i = 0; i < encoding.Length - 1; i++)
+        for (var j = i + 1; j < encoding.Length; j++)
+          allowedTogether[i, j] = allowedTogether[j, i] = random.Next(2) == 0;
+      
+      Encoding = encoding;
+    }
+
+    public double Evaluate(Individual individual, IRandom random) {
+      var penalty = 0;
+      var groups = individual.LinearLinkage(""lle"").GetGroups().ToList();
+      for (var i = 0; i < groups.Count; i++) {
+        for (var j = 0; j < groups[i].Count; j++)
+          for (var k = j + 1; k < groups[i].Count; k++)
+            if (!allowedTogether[groups[i][j], groups[i][k]]) penalty++;
+      }
+      if (penalty > 0) return penalty + ProblemSize;
+      else return groups.Count;
+    }
+
+    public void Analyze(Individual[] individuals, double[] qualities, ResultCollection results, IRandom random) { }
+
+    public IEnumerable<Individual> GetNeighbors(Individual individual, IRandom random) {
+      foreach (var move in ExhaustiveSwap2MoveGenerator.Generate(individual.LinearLinkage(""lle""))) {
+        var neighbor = individual.Copy();
+        var lle = neighbor.LinearLinkage(""lle"");
+        Swap2MoveMaker.Apply(lle, move);
+        yield return neighbor;
+      }
+    }
+  }
+}
+";
+    #endregion
 
     [TestMethod]
     [TestCategory("Samples.Create")]
     [TestProperty("Time", "medium")]
-    public void CreateGaTspSampleTest() {
-      var ga = CreateGaTspSample();
+    public void CreateGaGroupingProblemSampleTest() {
+      var ga = CreateGaGroupingProblemSample();
       string path = Path.Combine(SamplesUtils.SamplesDirectory, SampleFileName + SamplesUtils.SampleFileExtension);
       XmlGenerator.Serialize(ga, path);
@@ -47 +101 @@
     [TestCategory("Samples.Execute")]
     [TestProperty("Time", "long")]
-    public void RunGaTspSampleTest() {
-      var ga = CreateGaTspSample();
+    public void RunGaGroupingProblemSampleTest() {
+      var ga = CreateGaGroupingProblemSample();
       ga.SetSeedRandomly.Value = false;
       SamplesUtils.RunAlgorithm(ga);
-      Assert.AreEqual(12332, SamplesUtils.GetDoubleResult(ga, "BestQuality"));
-      Assert.AreEqual(13123.2, SamplesUtils.GetDoubleResult(ga, "CurrentAverageQuality"));
-      Assert.AreEqual(14538, SamplesUtils.GetDoubleResult(ga, "CurrentWorstQuality"));
+      Assert.AreEqual(26, SamplesUtils.GetDoubleResult(ga, "BestQuality"));
+      Assert.AreEqual(27.58, SamplesUtils.GetDoubleResult(ga, "CurrentAverageQuality"));
+      Assert.AreEqual(105, SamplesUtils.GetDoubleResult(ga, "CurrentWorstQuality"));
       Assert.AreEqual(99100, SamplesUtils.GetIntResult(ga, "EvaluatedSolutions"));
     }
 
-    private GeneticAlgorithm CreateGaTspSample() {
+    private GeneticAlgorithm CreateGaGroupingProblemSample() {
       GeneticAlgorithm ga = new GeneticAlgorithm();
 
       #region Problem Configuration
-      var provider = new TSPLIBTSPInstanceProvider();
-      var instance = provider.GetDataDescriptors().Where(x => x.Name == "ch130").Single();
-      TravelingSalesmanProblem tspProblem = new TravelingSalesmanProblem();
-      tspProblem.Load(provider.LoadData(instance));
-      tspProblem.UseDistanceMatrix.Value = true;
+      var problem = new SingleObjectiveProgrammableProblem() {
+        ProblemScript = { Code = ProblemCode }
+      };
+      problem.ProblemScript.Compile();
       #endregion
       #region Algorithm Configuration
-      ga.Name = "Genetic Algorithm - TSP";
-      ga.Description = "A genetic algorithm which solves the \"ch130\" traveling salesman problem (imported from TSPLIB)";
-      ga.Problem = tspProblem;
-      SamplesUtils.ConfigureGeneticAlgorithmParameters<ProportionalSelector, OrderCrossover2, InversionManipulator>(
-        ga, 100, 1, 1000, 0.05);
+      ga.Name = "Genetic Algorithm - Grouping Problem";
+      ga.Description = "A genetic algorithm which solves a grouping problem using the linear linkage encoding.";
+      ga.Problem = problem;
+      SamplesUtils.ConfigureGeneticAlgorithmParameters<TournamentSelector, MultiLinearLinkageCrossover, MultiLinearLinkageManipulator>(
+        ga, 100, 1, 1000, 0.05, 2);
       #endregion