Free cookie consent management tool by TermsFeed Policy Generator

source: trunk/sources/HeuristicLab.Tests/HeuristicLab-3.3/Samples/GAGroupingProblemSampleTest.cs @ 14713

Last change on this file since 14713 was 14475, checked in by sraggl, 8 years ago

#2666
Updated LinearLinkageEncoding by:

  • Speeding up GroupCrossover and SetGroups and GetGroups
  • making Constructor private adding static initializer Methods
File size: 5.2 KB
Line 
1#region License Information
2/* HeuristicLab
3 * Copyright (C) 2002-2016 Heuristic and Evolutionary Algorithms Laboratory (HEAL)
4 *
5 * This file is part of HeuristicLab.
6 *
7 * HeuristicLab is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation, either version 3 of the License, or
10 * (at your option) any later version.
11 *
12 * HeuristicLab is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with HeuristicLab. If not, see <http://www.gnu.org/licenses/>.
19 */
20#endregion
21
22using System.IO;
23using HeuristicLab.Algorithms.GeneticAlgorithm;
24using HeuristicLab.Encodings.LinearLinkageEncoding;
25using HeuristicLab.Persistence.Default.Xml;
26using HeuristicLab.Problems.Programmable;
27using HeuristicLab.Selection;
28using Microsoft.VisualStudio.TestTools.UnitTesting;
29
30namespace HeuristicLab.Tests {
31  [TestClass]
32  public class GAGroupingProblemSampleTest {
33    private const string SampleFileName = "GA_Grouping";
34    #region Code
35    private const string ProblemCode = @"
36using System;
37using System.Linq;
38using System.Collections.Generic;
39using HeuristicLab.Common;
40using HeuristicLab.Core;
41using HeuristicLab.Data;
42using HeuristicLab.Encodings.LinearLinkageEncoding;
43using HeuristicLab.Optimization;
44using HeuristicLab.Problems.Programmable;
45
46namespace HeuristicLab.Problems.Programmable {
47  public class CompiledSingleObjectiveProblemDefinition : CompiledProblemDefinition, ISingleObjectiveProblemDefinition {
48    private const int ProblemSize = 100;
49    public bool Maximization { get { return false; } }
50
51    private bool[,] adjacencyMatrix;
52     
53    public override void Initialize() {
54      var encoding = new LinearLinkageEncoding(""lle"", length: ProblemSize);
55      adjacencyMatrix = new bool[encoding.Length, encoding.Length];
56      var random = new System.Random(13);
57      for (var i = 0; i < encoding.Length - 1; i++)
58        for (var j = i + 1; j < encoding.Length; j++)
59          adjacencyMatrix[i, j] = adjacencyMatrix[j, i] = random.Next(2) == 0;
60     
61      Encoding = encoding;
62    }
63
64    public double Evaluate(Individual individual, IRandom random) {
65      var penalty = 0;
66      var groups = individual.LinearLinkage(""lle"").GetGroups().ToList();
67      for (var i = 0; i < groups.Count; i++) {
68        for (var j = 0; j < groups[i].Count; j++)
69          for (var k = j + 1; k < groups[i].Count; k++)
70            if (!adjacencyMatrix[groups[i][j], groups[i][k]]) penalty++;
71      }
72      var result = groups.Count;
73      if (penalty > 0) result += penalty + ProblemSize;
74      return result;
75    }
76
77    public void Analyze(Individual[] individuals, double[] qualities, ResultCollection results, IRandom random) { }
78
79    public IEnumerable<Individual> GetNeighbors(Individual individual, IRandom random) {
80      foreach (var move in ExhaustiveSwap2MoveGenerator.Generate(individual.LinearLinkage(""lle""))) {
81        var neighbor = individual.Copy();
82        var lle = neighbor.LinearLinkage(""lle"");
83        Swap2MoveMaker.Apply(lle, move);
84        yield return neighbor;
85      }
86    }
87  }
88}
89";
90    #endregion
91
92    [TestMethod]
93    [TestCategory("Samples.Create")]
94    [TestProperty("Time", "medium")]
95    public void CreateGaGroupingProblemSampleTest() {
96      var ga = CreateGaGroupingProblemSample();
97      string path = Path.Combine(SamplesUtils.SamplesDirectory, SampleFileName + SamplesUtils.SampleFileExtension);
98      XmlGenerator.Serialize(ga, path);
99    }
100
101    [TestMethod]
102    [TestCategory("Samples.Execute")]
103    [TestProperty("Time", "long")]
104    public void RunGaGroupingProblemSampleTest() {
105      var ga = CreateGaGroupingProblemSample();
106      ga.SetSeedRandomly.Value = false;
107      SamplesUtils.RunAlgorithm(ga);
108      Assert.AreEqual(127, SamplesUtils.GetDoubleResult(ga, "BestQuality"));
109      Assert.AreEqual(129,38, SamplesUtils.GetDoubleResult(ga, "CurrentAverageQuality"));
110      Assert.AreEqual(132, SamplesUtils.GetDoubleResult(ga, "CurrentWorstQuality"));
111      Assert.AreEqual(99100, SamplesUtils.GetIntResult(ga, "EvaluatedSolutions"));
112    }
113
114    private GeneticAlgorithm CreateGaGroupingProblemSample() {
115      GeneticAlgorithm ga = new GeneticAlgorithm();
116
117      #region Problem Configuration
118      var problem = new SingleObjectiveProgrammableProblem() {
119        ProblemScript = { Code = ProblemCode }
120      };
121      problem.ProblemScript.Compile();
122      #endregion
123      #region Algorithm Configuration
124      ga.Name = "Genetic Algorithm - Graph Coloring";
125      ga.Description = "A genetic algorithm which solves a graph coloring problem using the linear linkage encoding.";
126      ga.Problem = problem;
127      SamplesUtils.ConfigureGeneticAlgorithmParameters<TournamentSelector, MultiLinearLinkageCrossover, MultiLinearLinkageManipulator>(
128        ga, 100, 1, 1000, 0.05, 2);
129      #endregion
130
131      return ga;
132    }
133  }
134}
Note: See TracBrowser for help on using the repository browser.