Changeset 15700 for branches/1614_GeneralizedQAP/HeuristicLab.Problems.GeneralizedQuadraticAssignment.Algorithms/3.3/Infrastructure

Timestamp:

01/31/18 18:14:33 (7 years ago)

Author:

abeham

Message:

#1614:

• Changed performance measure to stopwatch instead of datetime for precision reasons

Location:

branches/1614_GeneralizedQAP/HeuristicLab.Problems.GeneralizedQuadraticAssignment.Algorithms/3.3/Infrastructure

Files:

• Algorithms/ContextAlgorithm.cs (modified) (5 diffs)
• Contexts/BasicContext.cs (modified) (2 diffs)
• Interfaces.cs (modified) (2 diffs)

branches/1614_GeneralizedQAP/HeuristicLab.Problems.GeneralizedQuadraticAssignment.Algorithms/3.3/Infrastructure/Algorithms/ContextAlgorithm.cs

@@ -21 +21 @@
 
 using System;
+using System.Diagnostics;
+using System.Linq;
 using System.Threading;
 using HeuristicLab.Analysis;
@@ -98 +100 @@
       set { stopAtBestKnownQualityParameter.Value.Value = value; }
     }
+
+    private Stopwatch stopwatch;
+    [Storable]
+    private TimeSpan elapsed;
+    [Storable]
+    private IndexedDataTable<double> qualityPerClock;
+    [Storable]
+    private IndexedDataRow<double> firstHitGraph;
 
     [StorableConstructor]
@@ -109 +119 @@
       maximumRuntimeParameter = cloner.Clone(original.maximumRuntimeParameter);
       stopAtBestKnownQualityParameter = cloner.Clone(original.stopAtBestKnownQualityParameter);
+      elapsed = original.elapsed;
+      qualityPerClock = cloner.Clone(original.qualityPerClock);
+      firstHitGraph = cloner.Clone(original.firstHitGraph);
+      if (context != null)
+        context.BestQualityChanged += ContextOnBestQualityChanged;
     }
     protected ContextAlgorithm()
@@ -123 +138 @@
       context = new TContext();
       context.Scope.Variables.Add(new Variable("Results", Results));
+      context.BestQualityChanged += ContextOnBestQualityChanged;
 
       IExecutionContext ctxt = null;
@@ -133 +149 @@
       context.EvaluatedSolutions = 0;
       context.BestQuality = double.NaN;
+
+      qualityPerClock = new IndexedDataTable<double>("Quality Per Clock");
+      firstHitGraph = new IndexedDataRow<double>("First-hit Graph");
+      qualityPerClock.Rows.Add(firstHitGraph);
+      Results.Add(new Result("QualityPerClock", qualityPerClock));
+
+      elapsed = TimeSpan.Zero;
+      stopwatch = Stopwatch.StartNew();
+    }
+
+    protected override void Run(CancellationToken cancellationToken) {
+      if (stopwatch == null || !stopwatch.IsRunning) stopwatch = Stopwatch.StartNew();
+    }
+
+    private void ContextOnBestQualityChanged(object sender, EventArgs e) {
+      if (double.IsNaN(Context.BestQuality)) return;
+      var newEntry = Tuple.Create((elapsed + stopwatch.Elapsed).TotalSeconds, Context.BestQuality);
+
+      if (firstHitGraph.Values.Count == 0) {
+        firstHitGraph.Values.Add(newEntry); // record the first data
+        firstHitGraph.Values.Add(Tuple.Create(newEntry.Item1, newEntry.Item2)); // last entry records max number of evaluations
+        return;
+      }
+
+      var improvement = firstHitGraph.Values.Last().Item2 != newEntry.Item2;
+      if (improvement) {
+        firstHitGraph.Values[firstHitGraph.Values.Count - 1] = newEntry; // record the improvement
+        firstHitGraph.Values.Add(Tuple.Create(newEntry.Item1, newEntry.Item2)); // last entry records max number of evaluations
+      } else {
+        firstHitGraph.Values[firstHitGraph.Values.Count - 1] = Tuple.Create(newEntry.Item1, newEntry.Item2);
+      }
     }
 
     public override void Prepare() {
-      context = null;
+      if (context != null) {
+        context.BestQualityChanged -= ContextOnBestQualityChanged;
+        context = null;
+      }
       base.Prepare();
+    }
+
+    protected override void OnPaused() {
+      base.OnPaused();
+      elapsed += stopwatch.Elapsed;
+      stopwatch.Reset();
+      firstHitGraph.Values[firstHitGraph.Values.Count - 1] = Tuple.Create(elapsed.TotalSeconds, Context.BestQuality);
+    }
+
+    protected override void OnStopped() {
+      base.OnStopped();
+      if (stopwatch.IsRunning) {
+        elapsed += stopwatch.Elapsed;
+        stopwatch.Reset();
+        firstHitGraph.Values[firstHitGraph.Values.Count - 1] = Tuple.Create(elapsed.TotalSeconds, Context.BestQuality);
+      }
+    }
+
+    [StorableHook(HookType.AfterDeserialization)]
+    private void AfterDeserialization() {
+      if (context != null) context.BestQualityChanged += ContextOnBestQualityChanged;
     }
 

branches/1614_GeneralizedQAP/HeuristicLab.Problems.GeneralizedQuadraticAssignment.Algorithms/3.3/Infrastructure/Contexts/BasicContext.cs

@@ -69 +69 @@
     public double BestQuality {
       get { return bestQuality.Value.Value; }
-      set { bestQuality.Value.Value = value; }
+      set {
+        if (bestQuality.Value.Value == value) return;
+        bestQuality.Value.Value = value;
+        OnBestQualityChanged();
+      }
     }
 
@@ -142 +146 @@
     }
 
+    public event EventHandler BestQualityChanged;
+    private void OnBestQualityChanged() {
+      BestQualityChanged?.Invoke(this, EventArgs.Empty);
+    }
+
     #region IExecutionContext members
     IAtomicOperation IExecutionContext.CreateOperation(IOperator op) {

branches/1614_GeneralizedQAP/HeuristicLab.Problems.GeneralizedQuadraticAssignment.Algorithms/3.3/Infrastructure/Interfaces.cs

@@ -20 +20 @@
 #endregion
 
+using System;
 using HeuristicLab.Core;
 
@@ -33 +34 @@
     int EvaluatedSolutions { get; set; }
     double BestQuality { get; set; }
+
+    event EventHandler BestQualityChanged;
   }