source: branches/symbreg-factors-2650/HeuristicLab.Problems.DataAnalysis.Views/3.4/Regression/RegressionSolutionScatterPlotView.cs @ 14277

Last change on this file since 14277 was 14277, checked in by gkronber, 5 years ago

#2650: merged r14245:14273 from trunk to branch (fixing conflicts in RegressionSolutionTargetResponseGradientView)

File size: 12.9 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
21using System;
22using System.Drawing;
23using System.Linq;
24using System.Windows.Forms;
25using System.Windows.Forms.DataVisualization.Charting;
26using HeuristicLab.MainForm;
27using HeuristicLab.MainForm.WindowsForms;
28using HeuristicLab.Visualization.ChartControlsExtensions;
29
30namespace HeuristicLab.Problems.DataAnalysis.Views {
31  [View("Scatter Plot")]
32  [Content(typeof(IRegressionSolution))]
33  public partial class RegressionSolutionScatterPlotView : DataAnalysisSolutionEvaluationView {
34    private const string ALL_SERIES = "All samples";
35    private const string TRAINING_SERIES = "Training samples";
36    private const string TEST_SERIES = "Test samples";
37
38    private const int OPACITY_LEVEL = 150;
39
40    public new IRegressionSolution Content {
41      get { return (IRegressionSolution)base.Content; }
42      set { base.Content = value; }
43    }
44
45    public RegressionSolutionScatterPlotView()
46      : base() {
47      InitializeComponent();
48
49      this.chart.Series.Add(ALL_SERIES);
50      this.chart.Series[ALL_SERIES].LegendText = ALL_SERIES;
51      this.chart.Series[ALL_SERIES].ChartType = SeriesChartType.FastPoint;
52
53      this.chart.Series.Add(TRAINING_SERIES);
54      this.chart.Series[TRAINING_SERIES].LegendText = TRAINING_SERIES;
55      this.chart.Series[TRAINING_SERIES].ChartType = SeriesChartType.FastPoint;
56      this.chart.Series[TRAINING_SERIES].Points.Add(1.0);
57
58      this.chart.Series.Add(TEST_SERIES);
59      this.chart.Series[TEST_SERIES].LegendText = TEST_SERIES;
60      this.chart.Series[TEST_SERIES].ChartType = SeriesChartType.FastPoint;
61
62      this.chart.TextAntiAliasingQuality = TextAntiAliasingQuality.High;
63      this.chart.AxisViewChanged += new EventHandler<System.Windows.Forms.DataVisualization.Charting.ViewEventArgs>(chart_AxisViewChanged);
64
65      //make series colors semi transparent
66      this.chart.ApplyPaletteColors();
67      this.chart.Series[ALL_SERIES].Color = Color.FromArgb(OPACITY_LEVEL, this.chart.Series[ALL_SERIES].Color);
68      this.chart.Series[TRAINING_SERIES].Color = Color.FromArgb(OPACITY_LEVEL, this.chart.Series[TRAINING_SERIES].Color);
69      this.chart.Series[TEST_SERIES].Color = Color.FromArgb(OPACITY_LEVEL, this.chart.Series[TEST_SERIES].Color);
70
71      //change all markers to circles
72      this.chart.Series[ALL_SERIES].MarkerStyle = MarkerStyle.Circle;
73      this.chart.Series[TRAINING_SERIES].MarkerStyle = MarkerStyle.Circle;
74      this.chart.Series[TEST_SERIES].MarkerStyle = MarkerStyle.Circle;
75
76      //configure axis
77      this.chart.CustomizeAllChartAreas();
78      this.chart.ChartAreas[0].AxisX.Title = "Estimated Values";
79      this.chart.ChartAreas[0].CursorX.IsUserSelectionEnabled = true;
80      this.chart.ChartAreas[0].AxisX.ScaleView.Zoomable = true;
81      this.chart.ChartAreas[0].CursorX.Interval = 1;
82      this.chart.ChartAreas[0].CursorY.Interval = 1;
83
84      this.chart.ChartAreas[0].AxisY.Title = "Target Values";
85      this.chart.ChartAreas[0].CursorY.IsUserSelectionEnabled = true;
86      this.chart.ChartAreas[0].AxisY.ScaleView.Zoomable = true;
87      this.chart.ChartAreas[0].AxisY.IsStartedFromZero = true;
88    }
89
90    protected override void RegisterContentEvents() {
91      base.RegisterContentEvents();
92      Content.ModelChanged += new EventHandler(Content_ModelChanged);
93      Content.ProblemDataChanged += new EventHandler(Content_ProblemDataChanged);
94    }
95    protected override void DeregisterContentEvents() {
96      base.DeregisterContentEvents();
97      Content.ModelChanged -= new EventHandler(Content_ModelChanged);
98      Content.ProblemDataChanged -= new EventHandler(Content_ProblemDataChanged);
99    }
100
101
102    private void Content_ProblemDataChanged(object sender, EventArgs e) {
103      UpdateChart();
104    }
105    private void Content_ModelChanged(object sender, EventArgs e) {
106      UpdateSeries();
107    }
108
109    protected override void OnContentChanged() {
110      base.OnContentChanged();
111      UpdateChart();
112    }
113
114    private void UpdateChart() {
115      if (InvokeRequired) Invoke((Action)UpdateChart);
116      else {
117        if (Content != null) {
118          this.UpdateSeries();
119          if (!this.chart.Series.Any(s => s.Points.Count > 0))
120            this.ClearChart();
121        }
122      }
123    }
124
125    private void UpdateCursorInterval() {
126      var estimatedValues = this.chart.Series[ALL_SERIES].Points.Select(x => x.XValue).DefaultIfEmpty(1.0);
127      var targetValues = this.chart.Series[ALL_SERIES].Points.Select(x => x.YValues[0]).DefaultIfEmpty(1.0);
128      double estimatedValuesRange = estimatedValues.Max() - estimatedValues.Min();
129      double targetValuesRange = targetValues.Max() - targetValues.Min();
130      double interestingValuesRange = Math.Min(Math.Max(targetValuesRange, 1.0), Math.Max(estimatedValuesRange, 1.0));
131      double digits = (int)Math.Log10(interestingValuesRange) - 3;
132      double zoomInterval = Math.Max(Math.Pow(10, digits), 10E-5);
133      this.chart.ChartAreas[0].CursorX.Interval = zoomInterval;
134      this.chart.ChartAreas[0].CursorY.Interval = zoomInterval;
135
136      this.chart.ChartAreas[0].AxisX.ScaleView.SmallScrollSize = zoomInterval;
137      this.chart.ChartAreas[0].AxisY.ScaleView.SmallScrollSize = zoomInterval;
138
139      this.chart.ChartAreas[0].AxisX.ScaleView.SmallScrollMinSizeType = DateTimeIntervalType.Number;
140      this.chart.ChartAreas[0].AxisX.ScaleView.SmallScrollMinSize = zoomInterval;
141      this.chart.ChartAreas[0].AxisY.ScaleView.SmallScrollMinSizeType = DateTimeIntervalType.Number;
142      this.chart.ChartAreas[0].AxisY.ScaleView.SmallScrollMinSize = zoomInterval;
143
144      if (digits < 0) {
145        this.chart.ChartAreas[0].AxisX.LabelStyle.Format = "F" + (int)Math.Abs(digits);
146        this.chart.ChartAreas[0].AxisY.LabelStyle.Format = "F" + (int)Math.Abs(digits);
147      } else {
148        this.chart.ChartAreas[0].AxisX.LabelStyle.Format = "F0";
149        this.chart.ChartAreas[0].AxisY.LabelStyle.Format = "F0";
150      }
151    }
152
153
154    private void UpdateSeries() {
155      if (InvokeRequired) Invoke((Action)UpdateSeries);
156      else {
157        string targetVariableName = Content.ProblemData.TargetVariable;
158        var dataset = Content.ProblemData.Dataset;
159        if (this.chart.Series[ALL_SERIES].Points.Count > 0)
160          this.chart.Series[ALL_SERIES].Points.DataBindXY(Content.EstimatedValues.ToArray(), "",
161            dataset.GetDoubleValues(targetVariableName).ToArray(), "");
162        if (this.chart.Series[TRAINING_SERIES].Points.Count > 0)
163          this.chart.Series[TRAINING_SERIES].Points.DataBindXY(Content.EstimatedTrainingValues.ToArray(), "",
164            dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TrainingIndices).ToArray(), "");
165        if (this.chart.Series[TEST_SERIES].Points.Count > 0)
166          this.chart.Series[TEST_SERIES].Points.DataBindXY(Content.EstimatedTestValues.ToArray(), "",
167           dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TestIndices).ToArray(), "");
168
169        double max = Content.EstimatedTrainingValues.Concat(Content.EstimatedTestValues.Concat(Content.EstimatedValues.Concat(dataset.GetDoubleValues(targetVariableName)))).Max();
170        double min = Content.EstimatedTrainingValues.Concat(Content.EstimatedTestValues.Concat(Content.EstimatedValues.Concat(dataset.GetDoubleValues(targetVariableName)))).Min();
171
172        double axisMin, axisMax, axisInterval;
173        ChartUtil.CalculateOptimalAxisInterval(min, max, out axisMin, out axisMax, out axisInterval);
174        this.chart.ChartAreas[0].AxisX.Title = "Estimated " + targetVariableName;
175        this.chart.ChartAreas[0].AxisX.Maximum = axisMax;
176        this.chart.ChartAreas[0].AxisX.Minimum = axisMin;
177        this.chart.ChartAreas[0].AxisX.Interval = axisInterval;
178        this.chart.ChartAreas[0].AxisY.Title = targetVariableName;
179        this.chart.ChartAreas[0].AxisY.Maximum = axisMax;
180        this.chart.ChartAreas[0].AxisY.Minimum = axisMin;
181        this.chart.ChartAreas[0].AxisY.Interval = axisInterval;
182
183        UpdateCursorInterval();
184      }
185    }
186
187    private void ClearChart() {
188      this.chart.Series[ALL_SERIES].Points.Clear();
189      this.chart.Series[TRAINING_SERIES].Points.Clear();
190      this.chart.Series[TEST_SERIES].Points.Clear();
191    }
192
193    private void ToggleSeriesData(Series series) {
194      if (series.Points.Count > 0) {  //checks if series is shown
195        if (this.chart.Series.Any(s => s != series && s.Points.Count > 0)) {
196          series.Points.Clear();
197        }
198      } else if (Content != null) {
199        string targetVariableName = Content.ProblemData.TargetVariable;
200
201        double[] predictedValues = null;
202        double[] targetValues = null;
203        switch (series.Name) {
204          case ALL_SERIES:
205            predictedValues = Content.EstimatedValues.ToArray();
206            targetValues = Content.ProblemData.Dataset.GetDoubleValues(targetVariableName).ToArray();
207            break;
208          case TRAINING_SERIES:
209            predictedValues = Content.EstimatedTrainingValues.ToArray();
210            targetValues = Content.ProblemData.Dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TrainingIndices).ToArray();
211            break;
212          case TEST_SERIES:
213            predictedValues = Content.EstimatedTestValues.ToArray();
214            targetValues = Content.ProblemData.Dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TestIndices).ToArray();
215            break;
216        }
217        if (predictedValues.Length == targetValues.Length)
218          series.Points.DataBindXY(predictedValues, "", targetValues, "");
219        this.chart.Legends[series.Legend].ForeColor = Color.Black;
220        UpdateCursorInterval();
221      }
222    }
223
224    private void chart_MouseDown(object sender, MouseEventArgs e) {
225      HitTestResult result = chart.HitTest(e.X, e.Y);
226      if (result.ChartElementType == ChartElementType.LegendItem) {
227        this.ToggleSeriesData(result.Series);
228      }
229    }
230
231    private void chart_MouseMove(object sender, MouseEventArgs e) {
232      HitTestResult result = chart.HitTest(e.X, e.Y);
233      if (result.ChartElementType == ChartElementType.LegendItem)
234        this.Cursor = Cursors.Hand;
235      else
236        this.Cursor = Cursors.Default;
237    }
238
239    private void chart_AxisViewChanged(object sender, System.Windows.Forms.DataVisualization.Charting.ViewEventArgs e) {
240      this.chart.ChartAreas[0].AxisX.ScaleView.Size = e.NewSize;
241      this.chart.ChartAreas[0].AxisY.ScaleView.Size = e.NewSize;
242    }
243
244    private void chart_CustomizeLegend(object sender, CustomizeLegendEventArgs e) {
245      e.LegendItems[0].Cells[1].ForeColor = this.chart.Series[ALL_SERIES].Points.Count == 0 ? Color.Gray : Color.Black;
246      e.LegendItems[1].Cells[1].ForeColor = this.chart.Series[TRAINING_SERIES].Points.Count == 0 ? Color.Gray : Color.Black;
247      e.LegendItems[2].Cells[1].ForeColor = this.chart.Series[TEST_SERIES].Points.Count == 0 ? Color.Gray : Color.Black;
248    }
249
250    private void chart_PostPaint(object sender, ChartPaintEventArgs e) {
251      var chartArea = e.ChartElement as ChartArea;
252      if (chartArea != null) {
253        ChartGraphics chartGraphics = e.ChartGraphics;
254        using (Pen p = new Pen(Color.DarkGray)) {
255          double xmin = chartArea.AxisX.ScaleView.ViewMinimum;
256          double xmax = chartArea.AxisX.ScaleView.ViewMaximum;
257          double ymin = chartArea.AxisY.ScaleView.ViewMinimum;
258          double ymax = chartArea.AxisY.ScaleView.ViewMaximum;
259
260          if (xmin > ymax || ymin > xmax) return;
261
262          PointF start = PointF.Empty;
263          start.X = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisX.AxisName, Math.Max(xmin, ymin));
264          start.Y = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisY.AxisName, Math.Max(xmin, ymin));
265          PointF end = PointF.Empty;
266          end.X = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisX.AxisName, Math.Min(xmax, ymax));
267          end.Y = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisY.AxisName, Math.Min(xmax, ymax));
268
269          chartGraphics.Graphics.DrawLine(p, chartGraphics.GetAbsolutePoint(start), chartGraphics.GetAbsolutePoint(end));
270        }
271      }
272    }
273  }
274}
Note: See TracBrowser for help on using the repository browser.