Free cookie consent management tool by TermsFeed Policy Generator

source: trunk/HeuristicLab.Algorithms.DataAnalysis/3.4/GaussianProcess/GaussianProcessRegressionSolutionCreator.cs @ 17313

Last change on this file since 17313 was 17180, checked in by swagner, 5 years ago

#2875: Removed years in copyrights

File size: 6.3 KB
RevLine 
[8375]1#region License Information
2/* HeuristicLab
[17180]3 * Copyright (C) Heuristic and Evolutionary Algorithms Laboratory (HEAL)
[8375]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.Common;
23using HeuristicLab.Core;
24using HeuristicLab.Data;
25using HeuristicLab.Operators;
26using HeuristicLab.Optimization;
27using HeuristicLab.Parameters;
[16565]28using HEAL.Attic;
[8375]29using HeuristicLab.Problems.DataAnalysis;
30
31namespace HeuristicLab.Algorithms.DataAnalysis {
[16565]32  [StorableType("9255DA02-C545-4952-AB36-5A588EE41407")]
[8375]33  [Item(Name = "GaussianProcessRegressionSolutionCreator",
34    Description = "Creates a Gaussian process solution from a trained model.")]
35  public sealed class GaussianProcessRegressionSolutionCreator : SingleSuccessorOperator {
36    private const string ProblemDataParameterName = "ProblemData";
37    private const string ModelParameterName = "GaussianProcessRegressionModel";
38    private const string SolutionParameterName = "Solution";
39    private const string ResultsParameterName = "Results";
40    private const string TrainingRSquaredResultName = "Training R²";
41    private const string TestRSquaredResultName = "Test R²";
[13205]42    private const string CreateSolutionParameterName = "CreateSolution";
[15160]43    private const string NegLogPseudoLikelihood = "Negative log pseudo-likelihood (LOO-CV)";
[8375]44
45    #region Parameter Properties
46    public ILookupParameter<IRegressionProblemData> ProblemDataParameter {
47      get { return (ILookupParameter<IRegressionProblemData>)Parameters[ProblemDataParameterName]; }
48    }
49    public ILookupParameter<IGaussianProcessSolution> SolutionParameter {
50      get { return (ILookupParameter<IGaussianProcessSolution>)Parameters[SolutionParameterName]; }
51    }
52    public ILookupParameter<IGaussianProcessModel> ModelParameter {
53      get { return (ILookupParameter<IGaussianProcessModel>)Parameters[ModelParameterName]; }
54    }
55    public ILookupParameter<ResultCollection> ResultsParameter {
56      get { return (ILookupParameter<ResultCollection>)Parameters[ResultsParameterName]; }
57    }
[13205]58    public ILookupParameter<BoolValue> CreateSolutionParameter {
59      get { return (ILookupParameter<BoolValue>)Parameters[CreateSolutionParameterName]; }
60    }
[8375]61    #endregion
62
63    [StorableConstructor]
[16565]64    private GaussianProcessRegressionSolutionCreator(StorableConstructorFlag _) : base(_) { }
[8375]65    private GaussianProcessRegressionSolutionCreator(GaussianProcessRegressionSolutionCreator original, Cloner cloner) : base(original, cloner) { }
66    public GaussianProcessRegressionSolutionCreator()
67      : base() {
68      // in
69      Parameters.Add(new LookupParameter<IRegressionProblemData>(ProblemDataParameterName, "The regression problem data for the Gaussian process solution."));
70      Parameters.Add(new LookupParameter<IGaussianProcessModel>(ModelParameterName, "The Gaussian process regression model to use for the solution."));
[13205]71      Parameters.Add(new LookupParameter<BoolValue>(CreateSolutionParameterName, "Flag that indicates if a solution should be produced at the end of the run"));
72
[8375]73      // in & out
74      Parameters.Add(new LookupParameter<ResultCollection>(ResultsParameterName, "The result collection of the algorithm."));
75      // out
76      Parameters.Add(new LookupParameter<IGaussianProcessSolution>(SolutionParameterName, "The produced Gaussian process solution."));
77    }
78
[13205]79    [StorableHook(HookType.AfterDeserialization)]
80    private void AfterDeserialization() {
81      // BackwardsCompatibility3.3
82      #region Backwards compatible code, remove with 3.4
83      if (!Parameters.ContainsKey(CreateSolutionParameterName)) {
84        Parameters.Add(new LookupParameter<BoolValue>(CreateSolutionParameterName, "Flag that indicates if a solution should be produced at the end of the run"));
85      }
86      #endregion
87    }
88
[8375]89    public override IDeepCloneable Clone(Cloner cloner) {
90      return new GaussianProcessRegressionSolutionCreator(this, cloner);
91    }
92
93    public override IOperation Apply() {
[13205]94      if (ModelParameter.ActualValue != null && CreateSolutionParameter.ActualValue.Value == true) {
[8494]95        var m = (IGaussianProcessModel)ModelParameter.ActualValue.Clone();
[8982]96        m.FixParameters();
[8494]97        var data = (IRegressionProblemData)ProblemDataParameter.ActualValue.Clone();
98        var s = new GaussianProcessRegressionSolution(m, data);
[8375]99
100
[8494]101        SolutionParameter.ActualValue = s;
102        var results = ResultsParameter.ActualValue;
103        if (!results.ContainsKey(SolutionParameterName)) {
104          results.Add(new Result(SolutionParameterName, "The Gaussian process regression solution", s));
105          results.Add(new Result(TrainingRSquaredResultName,
106                                 "The Pearson's R² of the Gaussian process solution on the training partition.",
107                                 new DoubleValue(s.TrainingRSquared)));
108          results.Add(new Result(TestRSquaredResultName,
109                                 "The Pearson's R² of the Gaussian process solution on the test partition.",
110                                 new DoubleValue(s.TestRSquared)));
[15160]111          results.Add(new Result(NegLogPseudoLikelihood,
112                                 "The negative log pseudo-likelihood (from leave-one-out-cross-validation).",
113                                 new DoubleValue(m.LooCvNegativeLogPseudoLikelihood)));
[8494]114        } else {
115          results[SolutionParameterName].Value = s;
116          results[TrainingRSquaredResultName].Value = new DoubleValue(s.TrainingRSquared);
117          results[TestRSquaredResultName].Value = new DoubleValue(s.TestRSquared);
[15160]118          results[NegLogPseudoLikelihood].Value = new DoubleValue(m.LooCvNegativeLogPseudoLikelihood);
[8494]119        }
[8375]120      }
121      return base.Apply();
122    }
123  }
124}
Note: See TracBrowser for help on using the repository browser.