source: trunk/sources/HeuristicLab.Problems.DataAnalysis.Views/3.4/Regression/RegressionSolutionScatterPlotView.cs @ 14405

Last change on this file since 14405 was 14405, checked in by gkronber, 3 years ago

#2702: switched axes for predicted and actual values in scatter plot

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].AxisY.Title = "Estimated Values";
79      this.chart.ChartAreas[0].CursorY.IsUserSelectionEnabled = true;
80      this.chart.ChartAreas[0].AxisY.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].AxisX.Title = "Target Values";
85      this.chart.ChartAreas[0].CursorX.IsUserSelectionEnabled = true;
86      this.chart.ChartAreas[0].AxisX.ScaleView.Zoomable = true;
87      this.chart.ChartAreas[0].AxisX.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(dataset.GetDoubleValues(targetVariableName).ToArray(), "",
161            Content.EstimatedValues.ToArray(), "");
162        if (this.chart.Series[TRAINING_SERIES].Points.Count > 0)
163          this.chart.Series[TRAINING_SERIES].Points.DataBindXY(dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TrainingIndices).ToArray(), "",
164            Content.EstimatedTrainingValues.ToArray(), "");
165        if (this.chart.Series[TEST_SERIES].Points.Count > 0)
166          this.chart.Series[TEST_SERIES].Points.DataBindXY(dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TestIndices).ToArray(), "",
167            Content.EstimatedTestValues.ToArray(), "");
168        double max = Content.EstimatedTrainingValues.Concat(Content.EstimatedTestValues.Concat(Content.EstimatedValues.Concat(dataset.GetDoubleValues(targetVariableName)))).Max();
169        double min = Content.EstimatedTrainingValues.Concat(Content.EstimatedTestValues.Concat(Content.EstimatedValues.Concat(dataset.GetDoubleValues(targetVariableName)))).Min();
170
171        double axisMin, axisMax, axisInterval;
172        ChartUtil.CalculateOptimalAxisInterval(min, max, out axisMin, out axisMax, out axisInterval);
173        this.chart.ChartAreas[0].AxisY.Title = "Estimated " + targetVariableName;
174        this.chart.ChartAreas[0].AxisY.Maximum = axisMax;
175        this.chart.ChartAreas[0].AxisY.Minimum = axisMin;
176        this.chart.ChartAreas[0].AxisY.Interval = axisInterval;
177        this.chart.ChartAreas[0].AxisX.Title = targetVariableName;
178        this.chart.ChartAreas[0].AxisX.Maximum = axisMax;
179        this.chart.ChartAreas[0].AxisX.Minimum = axisMin;
180        this.chart.ChartAreas[0].AxisX.Interval = axisInterval;
181
182        UpdateCursorInterval();
183      }
184    }
185
186    private void ClearChart() {
187      this.chart.Series[ALL_SERIES].Points.Clear();
188      this.chart.Series[TRAINING_SERIES].Points.Clear();
189      this.chart.Series[TEST_SERIES].Points.Clear();
190    }
191
192    private void ToggleSeriesData(Series series) {
193      if (series.Points.Count > 0) {  //checks if series is shown
194        if (this.chart.Series.Any(s => s != series && s.Points.Count > 0)) {
195          series.Points.Clear();
196        }
197      } else if (Content != null) {
198        string targetVariableName = Content.ProblemData.TargetVariable;
199
200        double[] predictedValues = null;
201        double[] targetValues = null;
202        switch (series.Name) {
203          case ALL_SERIES:
204            predictedValues = Content.EstimatedValues.ToArray();
205            targetValues = Content.ProblemData.Dataset.GetDoubleValues(targetVariableName).ToArray();
206            break;
207          case TRAINING_SERIES:
208            predictedValues = Content.EstimatedTrainingValues.ToArray();
209            targetValues = Content.ProblemData.Dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TrainingIndices).ToArray();
210            break;
211          case TEST_SERIES:
212            predictedValues = Content.EstimatedTestValues.ToArray();
213            targetValues = Content.ProblemData.Dataset.GetDoubleValues(targetVariableName, Content.ProblemData.TestIndices).ToArray();
214            break;
215        }
216        if (predictedValues.Length == targetValues.Length)
217          series.Points.DataBindXY(targetValues, "", predictedValues, "");
218        this.chart.Legends[series.Legend].ForeColor = Color.Black;
219        UpdateCursorInterval();
220      }
221    }
222
223    private void chart_MouseDown(object sender, MouseEventArgs e) {
224      HitTestResult result = chart.HitTest(e.X, e.Y);
225      if (result.ChartElementType == ChartElementType.LegendItem) {
226        this.ToggleSeriesData(result.Series);
227      }
228    }
229
230    private void chart_MouseMove(object sender, MouseEventArgs e) {
231      HitTestResult result = chart.HitTest(e.X, e.Y);
232      if (result.ChartElementType == ChartElementType.LegendItem)
233        this.Cursor = Cursors.Hand;
234      else
235        this.Cursor = Cursors.Default;
236    }
237
238    private void chart_AxisViewChanged(object sender, System.Windows.Forms.DataVisualization.Charting.ViewEventArgs e) {
239      this.chart.ChartAreas[0].AxisX.ScaleView.Size = e.NewSize;
240      this.chart.ChartAreas[0].AxisY.ScaleView.Size = e.NewSize;
241    }
242
243    private void chart_CustomizeLegend(object sender, CustomizeLegendEventArgs e) {
244      e.LegendItems[0].Cells[1].ForeColor = this.chart.Series[ALL_SERIES].Points.Count == 0 ? Color.Gray : Color.Black;
245      e.LegendItems[1].Cells[1].ForeColor = this.chart.Series[TRAINING_SERIES].Points.Count == 0 ? Color.Gray : Color.Black;
246      e.LegendItems[2].Cells[1].ForeColor = this.chart.Series[TEST_SERIES].Points.Count == 0 ? Color.Gray : Color.Black;
247    }
248
249    private void chart_PostPaint(object sender, ChartPaintEventArgs e) {
250      var chartArea = e.ChartElement as ChartArea;
251      if (chartArea != null) {
252        ChartGraphics chartGraphics = e.ChartGraphics;
253        using (Pen p = new Pen(Color.DarkGray)) {
254          double xmin = chartArea.AxisX.ScaleView.ViewMinimum;
255          double xmax = chartArea.AxisX.ScaleView.ViewMaximum;
256          double ymin = chartArea.AxisY.ScaleView.ViewMinimum;
257          double ymax = chartArea.AxisY.ScaleView.ViewMaximum;
258
259          if (xmin > ymax || ymin > xmax) return;
260
261          PointF start = PointF.Empty;
262          start.X = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisX.AxisName, Math.Max(xmin, ymin));
263          start.Y = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisY.AxisName, Math.Max(xmin, ymin));
264          PointF end = PointF.Empty;
265          end.X = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisX.AxisName, Math.Min(xmax, ymax));
266          end.Y = (float)chartGraphics.GetPositionFromAxis(chartArea.Name, chartArea.AxisY.AxisName, Math.Min(xmax, ymax));
267
268          chartGraphics.Graphics.DrawLine(p, chartGraphics.GetAbsolutePoint(start), chartGraphics.GetAbsolutePoint(end));
269        }
270      }
271    }
272  }
273}
Note: See TracBrowser for help on using the repository browser.