Free cookie consent management tool by TermsFeed Policy Generator

source: branches/2719_HeuristicLab.DatastreamAnalysis/HeuristicLab.DatastreamAnalysis.Views/3.4/ExtendedDataTableView.cs @ 17980

Last change on this file since 17980 was 17980, checked in by jzenisek, 3 years ago

#2719 merged head of HeuristicLab.Problems.DataAnalysis into branch; added several minor items
File size: 35.9 KB
Line 
1#region License Information
2/* HeuristicLab
3 * Copyright (C) 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 HeuristicLab.Analysis;
23using HeuristicLab.Analysis.Views;
24using HeuristicLab.Collections;
25using HeuristicLab.Core.Views;
26using HeuristicLab.MainForm;
27using System;
28using System.Collections.Generic;
29using System.Drawing;
30using System.Linq;
31using System.Windows.Forms;
32using System.Windows.Forms.DataVisualization.Charting;
33
34namespace HeuristicLab.DatastreamAnalysis.Views {
35  [View("ExtendedDataTable View")]
36  [Content(typeof(ExtendedDataTable), true)]
37  public partial class ExtendedDataTableView : NamedItemView, IConfigureableView {
38    protected List<Series> invisibleSeries;
39    protected Dictionary<IObservableList<Tuple<double,double>>, RangeDataRow> valuesRowsTable;
40    protected bool showChartOnly = false;
41
42    public new ExtendedDataTable Content {
43      get { return (ExtendedDataTable)base.Content; }
44      set { base.Content = value; }
45    }
46
47    public bool ShowChartOnly {
48      get { return showChartOnly; }
49      set {
50        if (showChartOnly != value) {
51          showChartOnly = value;
52          UpdateControlsVisibility();
53        }
54      }
55    }
56
57    public ExtendedDataTableView() {
58      InitializeComponent();
59      valuesRowsTable = new Dictionary<IObservableList<Tuple<double, double>>, RangeDataRow>();
60      invisibleSeries = new List<Series>();
61      chart.CustomizeAllChartAreas();
62      chart.ChartAreas[0].CursorX.Interval = 1;
63      chart.ContextMenuStrip.Items.Add(configureToolStripMenuItem);
64    }
65
66    #region Event Handler Registration
67    protected override void DeregisterContentEvents() {
68      foreach (RangeDataRow row in Content.Rows)
69        DeregisterDataRowEvents(row);
70      Content.VisualPropertiesChanged -= new EventHandler(Content_VisualPropertiesChanged);
71      Content.Rows.ItemsAdded -= new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsAdded);
72      Content.Rows.ItemsRemoved -= new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsRemoved);
73      Content.Rows.ItemsReplaced -= new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsReplaced);
74      Content.Rows.CollectionReset -= new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_CollectionReset);
75      base.DeregisterContentEvents();
76    }
77    protected override void RegisterContentEvents() {
78      base.RegisterContentEvents();
79      Content.VisualPropertiesChanged += new EventHandler(Content_VisualPropertiesChanged);
80      Content.Rows.ItemsAdded += new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsAdded);
81      Content.Rows.ItemsRemoved += new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsRemoved);
82      Content.Rows.ItemsReplaced += new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsReplaced);
83      Content.Rows.CollectionReset += new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_CollectionReset);
84    }
85
86    protected virtual void RegisterDataRowEvents(RangeDataRow row) {
87      row.NameChanged += new EventHandler(Row_NameChanged);
88      row.VisualPropertiesChanged += new EventHandler(Row_VisualPropertiesChanged);
89      valuesRowsTable.Add(row.Values, row);
90      row.Values.ItemsAdded += new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double,double>>>(Values_ItemsAdded);
91      row.Values.ItemsRemoved += new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsRemoved);
92      row.Values.ItemsReplaced += new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsReplaced);
93      row.Values.ItemsMoved += new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsMoved);
94      row.Values.CollectionReset += new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_CollectionReset);
95    }
96    protected virtual void DeregisterDataRowEvents(RangeDataRow row) {
97      row.Values.ItemsAdded -= new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsAdded);
98      row.Values.ItemsRemoved -= new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsRemoved);
99      row.Values.ItemsReplaced -= new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsReplaced);
100      row.Values.ItemsMoved -= new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsMoved);
101      row.Values.CollectionReset -= new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_CollectionReset);
102      valuesRowsTable.Remove(row.Values);
103      row.VisualPropertiesChanged -= new EventHandler(Row_VisualPropertiesChanged);
104      row.NameChanged -= new EventHandler(Row_NameChanged);
105    }
106    #endregion
107
108    protected override void OnContentChanged() {
109      base.OnContentChanged();
110      invisibleSeries.Clear();
111      chart.Titles[0].Text = string.Empty;
112      chart.ChartAreas[0].AxisX.Title = string.Empty;
113      chart.ChartAreas[0].AxisY.Title = string.Empty;
114      chart.ChartAreas[0].AxisY2.Title = string.Empty;
115      chart.Series.Clear();
116      if (Content != null) {
117        chart.Titles[0].Text = Content.Name;
118        chart.Titles[0].Visible = !string.IsNullOrEmpty(Content.Name);
119        AddDataRows(Content.Rows);
120        ConfigureChartArea(chart.ChartAreas[0]);
121        RecalculateAxesScale(chart.ChartAreas[0]);
122      }
123    }
124
125    protected override void SetEnabledStateOfControls() {
126      base.SetEnabledStateOfControls();
127      chart.Enabled = Content != null;
128    }
129
130    public void ShowConfiguration() {
131      MessageBox.Show("Nothing to configure.");
132      //if (Content != null) {
133      //  using (var dialog = new DataTableVisualPropertiesDialog(Content)) {
134      //    dialog.ShowDialog(this);
135      //  }
136      //} else MessageBox.Show("Nothing to configure.");
137    }
138
139    protected void UpdateControlsVisibility() {
140      if (InvokeRequired)
141        Invoke(new Action(UpdateControlsVisibility));
142      else {
143        foreach (Control c in Controls) {
144          if (c == chart) continue;
145          c.Visible = !showChartOnly;
146        }
147        chart.Dock = showChartOnly ? DockStyle.Fill : DockStyle.None;
148      }
149    }
150
151    protected virtual void AddDataRows(IEnumerable<RangeDataRow> rows) {
152      foreach (var row in rows) {
153        RegisterDataRowEvents(row);
154        var series = new Series(row.Name) {
155          Tag = row
156        };
157        if (row.VisualProperties.DisplayName.Trim() != String.Empty) series.LegendText = row.VisualProperties.DisplayName;
158        else series.LegendText = row.Name;
159        ConfigureSeries(series, row);
160        FillSeriesWithRowValues(series, row);
161        chart.Series.Add(series);
162      }
163      ConfigureChartArea(chart.ChartAreas[0]);
164      RecalculateAxesScale(chart.ChartAreas[0]);
165      UpdateYCursorInterval();
166      UpdateHistogramTransparency();
167    }
168
169    protected virtual void RemoveDataRows(IEnumerable<RangeDataRow> rows) {
170      foreach (var row in rows) {
171        DeregisterDataRowEvents(row);
172        Series series = chart.Series[row.Name];
173        chart.Series.Remove(series);
174        if (invisibleSeries.Contains(series))
175          invisibleSeries.Remove(series);
176      }
177      RecalculateAxesScale(chart.ChartAreas[0]);
178    }
179
180    private void ConfigureSeries(Series series, RangeDataRow row) {
181      RemoveCustomPropertyIfExists(series, "PointWidth");
182      series.BorderWidth = 1;
183      series.BorderDashStyle = ChartDashStyle.Solid;
184      series.BorderColor = Color.Empty;
185
186      if (row.VisualProperties.Color != Color.Empty)
187        series.Color = row.VisualProperties.Color;
188      else series.Color = Color.Empty;
189      series.IsVisibleInLegend = row.VisualProperties.IsVisibleInLegend;
190
191      switch (row.VisualProperties.ChartType) {
192        case DataRowVisualProperties.DataRowChartType.Line:
193          //series.ChartType = SeriesChartType.FastLine;
194          series.ChartType = SeriesChartType.Range;
195          series.BorderWidth = row.VisualProperties.LineWidth;
196          series.BorderDashStyle = ConvertLineStyle(row.VisualProperties.LineStyle);
197          break;
198        case DataRowVisualProperties.DataRowChartType.Bars:
199          // Bar is incompatible with anything but Bar and StackedBar*
200          if (!chart.Series.Any(x => x.ChartType != SeriesChartType.Bar && x.ChartType != SeriesChartType.StackedBar && x.ChartType != SeriesChartType.StackedBar100))
201            series.ChartType = SeriesChartType.Bar;
202          else {
203            series.ChartType = SeriesChartType.FastPoint; //default
204            row.VisualProperties.ChartType = DataRowVisualProperties.DataRowChartType.Points;
205          }
206          break;
207        case DataRowVisualProperties.DataRowChartType.Columns:
208          series.ChartType = SeriesChartType.Column;
209          break;
210        case DataRowVisualProperties.DataRowChartType.Points:
211          series.ChartType = SeriesChartType.FastPoint;
212          break;
213        case DataRowVisualProperties.DataRowChartType.Histogram:
214          bool stacked = Content.VisualProperties.HistogramAggregation == DataTableVisualProperties.DataTableHistogramAggregation.Stacked;
215          series.ChartType = stacked ? SeriesChartType.StackedColumn : SeriesChartType.Column;
216          bool sideBySide = Content.VisualProperties.HistogramAggregation == DataTableVisualProperties.DataTableHistogramAggregation.SideBySide;
217          series.SetCustomProperty("DrawSideBySide", sideBySide ? "True" : "False");
218          series.SetCustomProperty("PointWidth", "1");
219          if (!series.Color.IsEmpty && series.Color.GetBrightness() < 0.25)
220            series.BorderColor = Color.White;
221          else series.BorderColor = Color.Black;
222          break;
223        case DataRowVisualProperties.DataRowChartType.StepLine:
224          series.ChartType = SeriesChartType.StepLine;
225          series.BorderWidth = row.VisualProperties.LineWidth;
226          series.BorderDashStyle = ConvertLineStyle(row.VisualProperties.LineStyle);
227          break;
228        default:
229          series.ChartType = SeriesChartType.FastPoint;
230          break;
231      }
232      series.YAxisType = row.VisualProperties.SecondYAxis ? AxisType.Secondary : AxisType.Primary;
233      series.XAxisType = row.VisualProperties.SecondXAxis ? AxisType.Secondary : AxisType.Primary;
234      if (row.VisualProperties.DisplayName.Trim() != String.Empty) series.LegendText = row.VisualProperties.DisplayName;
235      else series.LegendText = row.Name;
236
237      string xAxisTitle = string.IsNullOrEmpty(Content.VisualProperties.XAxisTitle)
238                      ? "X"
239                      : Content.VisualProperties.XAxisTitle;
240      string yAxisTitle = string.IsNullOrEmpty(Content.VisualProperties.YAxisTitle)
241                            ? "Y"
242                            : Content.VisualProperties.YAxisTitle;
243      series.ToolTip =
244        series.LegendText + Environment.NewLine +
245        xAxisTitle + " = " + "#INDEX," + Environment.NewLine +
246        yAxisTitle + " = " + "#VAL";
247    }
248
249    private void ConfigureChartArea(ChartArea area) {
250      if (Content.VisualProperties.TitleFont != null) chart.Titles[0].Font = Content.VisualProperties.TitleFont;
251      if (!Content.VisualProperties.TitleColor.IsEmpty) chart.Titles[0].ForeColor = Content.VisualProperties.TitleColor;
252      chart.Titles[0].Text = Content.VisualProperties.Title;
253      chart.Titles[0].Visible = !string.IsNullOrEmpty(Content.VisualProperties.Title);
254
255      if (Content.VisualProperties.AxisTitleFont != null) area.AxisX.TitleFont = Content.VisualProperties.AxisTitleFont;
256      if (!Content.VisualProperties.AxisTitleColor.IsEmpty) area.AxisX.TitleForeColor = Content.VisualProperties.AxisTitleColor;
257      area.AxisX.Title = Content.VisualProperties.XAxisTitle;
258
259      if (Content.VisualProperties.AxisTitleFont != null) area.AxisX2.TitleFont = Content.VisualProperties.AxisTitleFont;
260      if (!Content.VisualProperties.AxisTitleColor.IsEmpty) area.AxisX2.TitleForeColor = Content.VisualProperties.AxisTitleColor;
261      area.AxisX2.Title = Content.VisualProperties.SecondXAxisTitle;
262
263      if (Content.VisualProperties.AxisTitleFont != null) area.AxisY.TitleFont = Content.VisualProperties.AxisTitleFont;
264      if (!Content.VisualProperties.AxisTitleColor.IsEmpty) area.AxisY.TitleForeColor = Content.VisualProperties.AxisTitleColor;
265      area.AxisY.Title = Content.VisualProperties.YAxisTitle;
266
267      if (Content.VisualProperties.AxisTitleFont != null) area.AxisY2.TitleFont = Content.VisualProperties.AxisTitleFont;
268      if (!Content.VisualProperties.AxisTitleColor.IsEmpty) area.AxisY2.TitleForeColor = Content.VisualProperties.AxisTitleColor;
269      area.AxisY2.Title = Content.VisualProperties.SecondYAxisTitle;
270
271      area.AxisX.IsLogarithmic = Content.VisualProperties.XAxisLogScale;
272      area.AxisX2.IsLogarithmic = Content.VisualProperties.SecondXAxisLogScale;
273      area.AxisY.IsLogarithmic = Content.VisualProperties.YAxisLogScale;
274      area.AxisY2.IsLogarithmic = Content.VisualProperties.SecondYAxisLogScale;
275    }
276
277    private void RecalculateAxesScale(ChartArea area) {
278      // Reset the axes bounds so that RecalculateAxesScale() will assign new bounds
279      foreach (Axis a in area.Axes) {
280        a.Minimum = double.NaN;
281        a.Maximum = double.NaN;
282      }
283      area.RecalculateAxesScale();
284      area.AxisX.IsMarginVisible = false;
285      area.AxisX2.IsMarginVisible = false;
286
287      if (!Content.VisualProperties.XAxisMinimumAuto && !double.IsNaN(Content.VisualProperties.XAxisMinimumFixedValue)) area.AxisX.Minimum = Content.VisualProperties.XAxisMinimumFixedValue;
288      if (!Content.VisualProperties.XAxisMaximumAuto && !double.IsNaN(Content.VisualProperties.XAxisMaximumFixedValue)) area.AxisX.Maximum = Content.VisualProperties.XAxisMaximumFixedValue;
289      if (!Content.VisualProperties.SecondXAxisMinimumAuto && !double.IsNaN(Content.VisualProperties.SecondXAxisMinimumFixedValue)) area.AxisX2.Minimum = Content.VisualProperties.SecondXAxisMinimumFixedValue;
290      if (!Content.VisualProperties.SecondXAxisMaximumAuto && !double.IsNaN(Content.VisualProperties.SecondXAxisMaximumFixedValue)) area.AxisX2.Maximum = Content.VisualProperties.SecondXAxisMaximumFixedValue;
291      if (!Content.VisualProperties.YAxisMinimumAuto && !double.IsNaN(Content.VisualProperties.YAxisMinimumFixedValue)) area.AxisY.Minimum = Content.VisualProperties.YAxisMinimumFixedValue;
292      if (!Content.VisualProperties.YAxisMaximumAuto && !double.IsNaN(Content.VisualProperties.YAxisMaximumFixedValue)) area.AxisY.Maximum = Content.VisualProperties.YAxisMaximumFixedValue;
293      if (!Content.VisualProperties.SecondYAxisMinimumAuto && !double.IsNaN(Content.VisualProperties.SecondYAxisMinimumFixedValue)) area.AxisY2.Minimum = Content.VisualProperties.SecondYAxisMinimumFixedValue;
294      if (!Content.VisualProperties.SecondYAxisMaximumAuto && !double.IsNaN(Content.VisualProperties.SecondYAxisMaximumFixedValue)) area.AxisY2.Maximum = Content.VisualProperties.SecondYAxisMaximumFixedValue;
295      if (area.AxisX.Minimum >= area.AxisX.Maximum) area.AxisX.Maximum = area.AxisX.Minimum + 1;
296      if (area.AxisX2.Minimum >= area.AxisX2.Maximum) area.AxisX2.Maximum = area.AxisX2.Minimum + 1;
297      if (area.AxisY.Minimum >= area.AxisY.Maximum) area.AxisY.Maximum = area.AxisY.Minimum + 1;
298      if (area.AxisY2.Minimum >= area.AxisY2.Maximum) area.AxisY2.Maximum = area.AxisY2.Minimum + 1;
299    }
300
301    protected virtual void UpdateYCursorInterval() {
302      double interestingValuesRange = (
303        from series in chart.Series
304        where series.Enabled
305        let values = (from point in series.Points
306                      where !point.IsEmpty
307                      select point.YValues[0]).DefaultIfEmpty(1.0)
308        let range = values.Max() - values.Min()
309        where range > 0.0
310        select range
311        ).DefaultIfEmpty(1.0).Min();
312
313      double digits = (int)Math.Log10(interestingValuesRange) - 3;
314      double yZoomInterval = Math.Pow(10, digits);
315      this.chart.ChartAreas[0].CursorY.Interval = yZoomInterval;
316    }
317
318    protected void UpdateHistogramTransparency() {
319      if (Content.Rows.Any(r => RequiresTransparency(r) && r.VisualProperties.Color.IsEmpty)) {
320        foreach (var series in chart.Series) // sync colors before applying palette colors
321          series.Color = ((RangeDataRow)series.Tag).VisualProperties.Color;
322        chart.ApplyPaletteColors();
323      }
324
325      var numTransparent = Content.Rows.Count(RequiresTransparency);
326      if (numTransparent <= 1) return;
327      foreach (var series in chart.Series) {
328        var row = (RangeDataRow)series.Tag;
329        if (!RequiresTransparency(row))
330          continue;
331        var baseColor = row.VisualProperties.Color;
332        if (baseColor.IsEmpty) baseColor = series.Color;
333        series.Color = Color.FromArgb(180, baseColor);
334      }
335    }
336    private bool RequiresTransparency(RangeDataRow row) {
337      return row.VisualProperties.ChartType == DataRowVisualProperties.DataRowChartType.Histogram
338             && Content.VisualProperties.HistogramAggregation == DataTableVisualProperties.DataTableHistogramAggregation.Overlapping;
339    }
340
341    private void ToggleSeriesVisible(Series series) {
342      if (!invisibleSeries.Contains(series)) {
343        ClearPoints(series.Points);
344        invisibleSeries.Add(series);
345      } else {
346        invisibleSeries.Remove(series);
347        if (Content != null) {
348
349          var row = (from r in Content.Rows
350                     where r.Name == series.Name
351                     select r).Single();
352          FillSeriesWithRowValues(series, row);
353          this.chart.Legends[series.Legend].ForeColor = Color.Black;
354          RecalculateAxesScale(chart.ChartAreas[0]);
355          UpdateYCursorInterval();
356        }
357      }
358    }
359
360    private void FillSeriesWithRowValues(Series series, RangeDataRow row) {
361      switch (row.VisualProperties.ChartType) {
362        case DataRowVisualProperties.DataRowChartType.Histogram:
363          // when a single histogram is updated, all histograms must be updated. otherwise the value ranges may not be equal.
364          var histograms = Content.Rows
365            .Where(r => r.VisualProperties.ChartType == DataRowVisualProperties.DataRowChartType.Histogram)
366            .ToList();
367          CalculateHistogram(series, row, histograms);
368          foreach (var h in from r in histograms
369                            where r != row
370                            let s = chart.Series.FindByName(r.Name)
371                            where s != null
372                            where !invisibleSeries.Contains(s)
373                            select new { row = r, series = s }) {
374            ClearPoints(h.series.Points);
375            CalculateHistogram(h.series, h.row, histograms);
376          }
377          break;
378        default: {
379            bool yLogarithmic = series.YAxisType == AxisType.Primary
380                                  ? Content.VisualProperties.YAxisLogScale
381                                  : Content.VisualProperties.SecondYAxisLogScale;
382            bool xLogarithmic = series.XAxisType == AxisType.Primary
383                                  ? Content.VisualProperties.XAxisLogScale
384                                  : Content.VisualProperties.SecondXAxisLogScale;
385            for (int i = 0; i < row.Values.Count; i++) {
386              var value = row.Values[i];
387              var point = new DataPoint();
388              point.XValue = row.VisualProperties.StartIndexZero && !xLogarithmic ? i : i + 1;
389              if (IsInvalidValue(value.Item1) || (yLogarithmic && value.Item1 <= 0)
390                || IsInvalidValue(value.Item2) || (yLogarithmic && value.Item2 <= 0))
391                point.IsEmpty = true;
392              else
393                point.YValues = new double[] { value.Item1, value.Item2 };
394              series.Points.Add(point);
395            }
396          }
397          break;
398      }
399    }
400
401    protected virtual void CalculateHistogram(Series series, RangeDataRow row, IEnumerable<RangeDataRow> histogramRows) {
402      ClearPoints(series.Points);
403      if (!row.Values.Any()) return;
404
405      var validValues = histogramRows.SelectMany(r => r.Values).Where(x => !IsInvalidValue(x.Item1) && !IsInvalidValue(x.Item2)).ToList();
406      if (!validValues.Any()) return;
407
408      int bins = Content.VisualProperties.HistogramBins;
409      decimal minValue = (decimal)validValues.Min(x => x.Item1);
410      decimal maxValue = (decimal)validValues.Max(x => x.Item2);
411      decimal intervalWidth = (maxValue - minValue) / bins;
412      if (intervalWidth < 0) return;
413      if (intervalWidth == 0) {
414        series.Points.AddXY(minValue, row.Values.Count);
415        return;
416      }
417
418      if (!Content.VisualProperties.HistogramExactBins) {
419        intervalWidth = (decimal)HumanRoundRange((double)intervalWidth);
420        minValue = Math.Floor(minValue / intervalWidth) * intervalWidth;
421        maxValue = Math.Ceiling(maxValue / intervalWidth) * intervalWidth;
422      }
423
424      decimal intervalCenter = intervalWidth / 2;
425
426      decimal min = 0.0m, max = 0.0m;
427      if (!Double.IsNaN(Content.VisualProperties.XAxisMinimumFixedValue) && !Content.VisualProperties.XAxisMinimumAuto)
428        min = (decimal)Content.VisualProperties.XAxisMinimumFixedValue;
429      else min = minValue;
430      if (!Double.IsNaN(Content.VisualProperties.XAxisMaximumFixedValue) && !Content.VisualProperties.XAxisMaximumAuto)
431        max = (decimal)Content.VisualProperties.XAxisMaximumFixedValue;
432      else max = maxValue + intervalWidth;
433
434      double axisInterval = (double)intervalWidth / row.VisualProperties.ScaleFactor;
435
436      var area = chart.ChartAreas[0];
437      area.AxisX.Interval = axisInterval;
438
439      series.SetCustomProperty("PointWidth", "1"); // 0.8 is the default value
440
441      // get the range or intervals which define the grouping of the frequency values
442      var range = Range(min, max, intervalWidth).Skip(1).ToList();
443
444      // aggregate the row values by unique key and frequency value
445      var valueFrequencies = (from v in row.Values
446                              where !IsInvalidValue(v.Item1) && !IsInvalidValue(v.Item2)
447                              orderby v
448                              group v by v into g
449                              select new Tuple<Tuple<double,double>, double>(g.First(), g.Count())).ToList();
450
451      // ensure that each column is displayed completely on the chart by adding two dummy datapoints on the upper and lower range
452      series.Points.Add(new DataPoint((double)(min - intervalWidth), 0));
453      series.Points.Add(new DataPoint((double)(max + intervalWidth), 0));
454
455      // add data points
456      int j = 0;
457      int overallCount = row.Values.Count(x => !IsInvalidValue(x.Item1) && !IsInvalidValue(x.Item2));
458      foreach (var d in range) {
459        double sum = 0.0;
460        // sum the frequency values that fall within the same interval
461        while (j < valueFrequencies.Count && (decimal)valueFrequencies[j].Item1.Item2 < d) {
462          sum += valueFrequencies[j].Item2;
463          ++j;
464        }
465        string xAxisTitle = string.IsNullOrEmpty(Content.VisualProperties.XAxisTitle)
466                              ? "X"
467                              : Content.VisualProperties.XAxisTitle;
468        string yAxisTitle = string.IsNullOrEmpty(Content.VisualProperties.YAxisTitle)
469                              ? "Y"
470                              : Content.VisualProperties.YAxisTitle;
471        series.Points.Add(new DataPoint((double)(d - intervalCenter), sum) {
472          ToolTip =
473            string.Format("{0}: [{1} - {2})", xAxisTitle, (d - intervalWidth), d) + Environment.NewLine +
474            string.Format("{0}: {1} ({2:F2}%)", yAxisTitle, sum, sum / overallCount * 100)
475        });
476      }
477    }
478
479    #region Event Handlers
480    #region Content Event Handlers
481    protected override void Content_NameChanged(object sender, EventArgs e) {
482      if (InvokeRequired)
483        Invoke(new EventHandler(Content_NameChanged), sender, e);
484      else {
485        Content.VisualProperties.Title = Content.Name;
486        base.Content_NameChanged(sender, e);
487      }
488    }
489    private void Content_VisualPropertiesChanged(object sender, EventArgs e) {
490      if (InvokeRequired)
491        Invoke(new EventHandler(Content_VisualPropertiesChanged), sender, e);
492      else {
493        ConfigureChartArea(chart.ChartAreas[0]);
494        RecalculateAxesScale(chart.ChartAreas[0]); // axes min/max could have changed
495
496        chart.Update(); // side-by-side and stacked histograms are not always correctly displayed without an update
497        // (chart update is required before the series are updated, otherwise the widths of the bars are updated incorrectly)
498        foreach (var row in Content.Rows.Where(r => r.VisualProperties.ChartType == DataRowVisualProperties.DataRowChartType.Histogram))
499          Row_VisualPropertiesChanged(row, EventArgs.Empty); // Histogram properties could have changed
500      }
501    }
502    #endregion
503    #region Rows Event Handlers
504    private void Rows_ItemsAdded(object sender, CollectionItemsChangedEventArgs<RangeDataRow> e) {
505      if (InvokeRequired)
506        Invoke(new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsAdded), sender, e);
507      else {
508        AddDataRows(e.Items);
509      }
510    }
511    private void Rows_ItemsRemoved(object sender, CollectionItemsChangedEventArgs<RangeDataRow> e) {
512      if (InvokeRequired)
513        Invoke(new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsRemoved), sender, e);
514      else {
515        RemoveDataRows(e.Items);
516      }
517    }
518    private void Rows_ItemsReplaced(object sender, CollectionItemsChangedEventArgs<RangeDataRow> e) {
519      if (InvokeRequired)
520        Invoke(new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_ItemsReplaced), sender, e);
521      else {
522        RemoveDataRows(e.OldItems);
523        AddDataRows(e.Items);
524      }
525    }
526    private void Rows_CollectionReset(object sender, CollectionItemsChangedEventArgs<RangeDataRow> e) {
527      if (InvokeRequired)
528        Invoke(new CollectionItemsChangedEventHandler<RangeDataRow>(Rows_CollectionReset), sender, e);
529      else {
530        RemoveDataRows(e.OldItems);
531        AddDataRows(e.Items);
532      }
533    }
534    #endregion
535    #region Row Event Handlers
536    private void Row_VisualPropertiesChanged(object sender, EventArgs e) {
537      if (InvokeRequired)
538        Invoke(new EventHandler(Row_VisualPropertiesChanged), sender, e);
539      else {
540        RangeDataRow row = (RangeDataRow)sender;
541        Series series = chart.Series[row.Name];
542        ClearPoints(series.Points);
543        ConfigureSeries(series, row);
544        if (!invisibleSeries.Contains(series)) {
545          FillSeriesWithRowValues(series, row);
546          RecalculateAxesScale(chart.ChartAreas[0]);
547          UpdateHistogramTransparency();
548        }
549      }
550    }
551    private void Row_NameChanged(object sender, EventArgs e) {
552      if (InvokeRequired)
553        Invoke(new EventHandler(Row_NameChanged), sender, e);
554      else {
555        RangeDataRow row = (RangeDataRow)sender;
556        chart.Series[row.Name].Name = row.Name;
557      }
558    }
559    #endregion
560    #region Values Event Handlers
561    private void Values_ItemsAdded(object sender, CollectionItemsChangedEventArgs<IndexedItem<Tuple<double,double>>> e) {
562      if (InvokeRequired)
563        Invoke(new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsAdded), sender, e);
564      else {
565        RangeDataRow row = null;
566        valuesRowsTable.TryGetValue((IObservableList<Tuple<double, double>>)sender, out row);
567        if (row != null) {
568          Series rowSeries = chart.Series[row.Name];
569          if (!invisibleSeries.Contains(rowSeries)) {
570            ClearPoints(rowSeries.Points);
571            FillSeriesWithRowValues(rowSeries, row);
572            RecalculateAxesScale(chart.ChartAreas[0]);
573            UpdateYCursorInterval();
574          }
575        }
576      }
577    }
578    private void Values_ItemsRemoved(object sender, CollectionItemsChangedEventArgs<IndexedItem<Tuple<double, double>>> e) {
579      if (InvokeRequired)
580        Invoke(new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsRemoved), sender, e);
581      else {
582        RangeDataRow row = null;
583        valuesRowsTable.TryGetValue((IObservableList<Tuple<double, double>>)sender, out row);
584        if (row != null) {
585          Series rowSeries = chart.Series[row.Name];
586          if (!invisibleSeries.Contains(rowSeries)) {
587            ClearPoints(rowSeries.Points);
588            FillSeriesWithRowValues(rowSeries, row);
589            RecalculateAxesScale(chart.ChartAreas[0]);
590            UpdateYCursorInterval();
591          }
592        }
593      }
594    }
595    private void Values_ItemsReplaced(object sender, CollectionItemsChangedEventArgs<IndexedItem<Tuple<double, double>>> e) {
596      if (InvokeRequired)
597        Invoke(new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsReplaced), sender, e);
598      else {
599        RangeDataRow row = null;
600        valuesRowsTable.TryGetValue((IObservableList<Tuple<double, double>>)sender, out row);
601        if (row != null) {
602          Series rowSeries = chart.Series[row.Name];
603          if (!invisibleSeries.Contains(rowSeries)) {
604            if (row.VisualProperties.ChartType == DataRowVisualProperties.DataRowChartType.Histogram) {
605              ClearPoints(rowSeries.Points);
606              FillSeriesWithRowValues(rowSeries, row);
607            } else {
608              foreach (IndexedItem<Tuple<double, double>> item in e.Items) {
609                if (IsInvalidValue(item.Value.Item1) || IsInvalidValue(item.Value.Item2))
610                  rowSeries.Points[item.Index].IsEmpty = true;
611                else {
612                  rowSeries.Points[item.Index].YValues = new double[] { item.Value.Item1, item.Value.Item2 };
613                  rowSeries.Points[item.Index].IsEmpty = false;
614                }
615              }
616            }
617            RecalculateAxesScale(chart.ChartAreas[0]);
618            UpdateYCursorInterval();
619          }
620        }
621      }
622    }
623    private void Values_ItemsMoved(object sender, CollectionItemsChangedEventArgs<IndexedItem<Tuple<double, double>>> e) {
624      if (InvokeRequired)
625        Invoke(new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_ItemsMoved), sender, e);
626      else {
627        RangeDataRow row = null;
628        valuesRowsTable.TryGetValue((IObservableList<Tuple<double, double>>)sender, out row);
629        if (row != null) {
630          Series rowSeries = chart.Series[row.Name];
631          if (!invisibleSeries.Contains(rowSeries)) {
632            ClearPoints(rowSeries.Points);
633            FillSeriesWithRowValues(rowSeries, row);
634            RecalculateAxesScale(chart.ChartAreas[0]);
635            UpdateYCursorInterval();
636          }
637        }
638      }
639    }
640
641    private void Values_CollectionReset(object sender, CollectionItemsChangedEventArgs<IndexedItem<Tuple<double, double>>> e) {
642      if (InvokeRequired)
643        Invoke(new CollectionItemsChangedEventHandler<IndexedItem<Tuple<double, double>>>(Values_CollectionReset), sender, e);
644      else {
645        RangeDataRow row = null;
646        valuesRowsTable.TryGetValue((IObservableList<Tuple<double, double>>)sender, out row);
647        if (row != null) {
648          Series rowSeries = chart.Series[row.Name];
649          if (!invisibleSeries.Contains(rowSeries)) {
650            ClearPoints(rowSeries.Points);
651            FillSeriesWithRowValues(rowSeries, row);
652            RecalculateAxesScale(chart.ChartAreas[0]);
653            UpdateYCursorInterval();
654          }
655        }
656      }
657    }
658    #endregion
659    private void configureToolStripMenuItem_Click(object sender, EventArgs e) {
660      ShowConfiguration();
661    }
662    #endregion
663
664    #region Chart Event Handlers
665    private void chart_MouseDown(object sender, MouseEventArgs e) {
666      HitTestResult result = chart.HitTest(e.X, e.Y);
667      if (result.ChartElementType == ChartElementType.LegendItem) {
668        ToggleSeriesVisible(result.Series);
669      }
670    }
671    private void chart_MouseMove(object sender, MouseEventArgs e) {
672      HitTestResult result = chart.HitTest(e.X, e.Y);
673      if (result.ChartElementType == ChartElementType.LegendItem)
674        this.Cursor = Cursors.Hand;
675      else
676        this.Cursor = Cursors.Default;
677    }
678    private void chart_CustomizeLegend(object sender, CustomizeLegendEventArgs e) {
679      foreach (LegendItem legendItem in e.LegendItems) {
680        var series = chart.Series[legendItem.SeriesName];
681        if (series != null) {
682          bool seriesIsInvisible = invisibleSeries.Contains(series);
683          foreach (LegendCell cell in legendItem.Cells) {
684            cell.ForeColor = seriesIsInvisible ? Color.Gray : Color.Black;
685          }
686        }
687      }
688    }
689    #endregion
690
691    #region Helpers
692    public static IEnumerable<decimal> Range(decimal min, decimal max, decimal step) {
693      decimal i;
694      for (i = min; i <= max; i += step)
695        yield return i;
696
697      if (i != max + step)
698        yield return i;
699    }
700
701    protected void RemoveCustomPropertyIfExists(Series series, string property) {
702      if (series.IsCustomPropertySet(property)) series.DeleteCustomProperty(property);
703    }
704
705    private double HumanRoundRange(double range) {
706      double base10 = Math.Pow(10.0, Math.Floor(Math.Log10(range)));
707      double rounding = range / base10;
708      if (rounding <= 1.5) rounding = 1;
709      else if (rounding <= 2.25) rounding = 2;
710      else if (rounding <= 3.75) rounding = 2.5;
711      else if (rounding <= 7.5) rounding = 5;
712      else rounding = 10;
713      return rounding * base10;
714    }
715
716    private double HumanRoundMax(double max) {
717      double base10;
718      if (max > 0) base10 = Math.Pow(10.0, Math.Floor(Math.Log10(max)));
719      else base10 = Math.Pow(10.0, Math.Ceiling(Math.Log10(-max)));
720      double rounding = (max > 0) ? base10 : -base10;
721      while (rounding < max) rounding += base10;
722      return rounding;
723    }
724
725    private ChartDashStyle ConvertLineStyle(DataRowVisualProperties.DataRowLineStyle dataRowLineStyle) {
726      switch (dataRowLineStyle) {
727        case DataRowVisualProperties.DataRowLineStyle.Dash:
728          return ChartDashStyle.Dash;
729        case DataRowVisualProperties.DataRowLineStyle.DashDot:
730          return ChartDashStyle.DashDot;
731        case DataRowVisualProperties.DataRowLineStyle.DashDotDot:
732          return ChartDashStyle.DashDotDot;
733        case DataRowVisualProperties.DataRowLineStyle.Dot:
734          return ChartDashStyle.Dot;
735        case DataRowVisualProperties.DataRowLineStyle.NotSet:
736          return ChartDashStyle.NotSet;
737        case DataRowVisualProperties.DataRowLineStyle.Solid:
738          return ChartDashStyle.Solid;
739        default:
740          return ChartDashStyle.NotSet;
741      }
742    }
743
744    protected static bool IsInvalidValue(double x) {
745      return double.IsNaN(x) || x < (double)decimal.MinValue || x > (double)decimal.MaxValue;
746    }
747
748    // workaround for performance problem as described in https://stackoverflow.com/questions/5744930/datapointcollection-clear-performance
749    public static void ClearPoints(DataPointCollection points) {
750      points.SuspendUpdates();
751      while (points.Count > 0)
752        points.RemoveAt(points.Count - 1);
753      points.ResumeUpdates();
754    }
755    #endregion
756  }
757}
Note: See TracBrowser for help on using the repository browser.