source: trunk/sources/HeuristicLab.Problems.DataAnalysis.Symbolic/3.4/Analyzers/SymbolicDataAnalysisAlleleFrequencyAnalyzer.cs @ 14826

Last change on this file since 14826 was 14826, checked in by gkronber, 6 months ago

#2650: merged the factors branch into trunk

File size: 5.0 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
21
22using System.Collections.Generic;
23using System.Linq;
24using System.Text;
25using HeuristicLab.Analysis;
26using HeuristicLab.Common;
27using HeuristicLab.Core;
28using HeuristicLab.Data;
29using HeuristicLab.Encodings.SymbolicExpressionTreeEncoding;
30using HeuristicLab.Parameters;
31using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
32
33namespace HeuristicLab.Problems.DataAnalysis.Symbolic {
34  [Item("SymbolicDataAnalysisAlleleFrequencyAnalyzer", "")]
35  [StorableClass]
36  public sealed class SymbolicDataAnalysisAlleleFrequencyAnalyzer : AlleleFrequencyAnalyzer<ISymbolicExpressionTree>, ISymbolicDataAnalysisAnalyzer {
37    private const string AlleleTreeDepthParameterName = "AlleleTreeDepth";
38
39    #region parameter properties
40    public IScopeTreeLookupParameter<ISymbolicExpressionTree> SymbolicExpressionTreeParameter {
41      get { return SolutionParameter; }
42    }
43
44    public ILookupParameter<Optimization.ResultCollection> ResultCollectionParameter {
45      get { return ResultsParameter; }
46    }
47
48    public IFixedValueParameter<IntValue> AlleleTreeDepthParameter {
49      get { return (IFixedValueParameter<IntValue>)Parameters[AlleleTreeDepthParameterName]; }
50    }
51    #endregion
52    #region properties
53    public int AlleleTreeDepth {
54      get { return AlleleTreeDepthParameter.Value.Value; }
55      set { AlleleTreeDepthParameter.Value.Value = value; }
56    }
57    #endregion
58
59    [StorableConstructor]
60    private SymbolicDataAnalysisAlleleFrequencyAnalyzer(bool deserializing) : base(deserializing) { }
61    private SymbolicDataAnalysisAlleleFrequencyAnalyzer(SymbolicDataAnalysisAlleleFrequencyAnalyzer original, Cloner cloner) : base(original, cloner) { }
62    public SymbolicDataAnalysisAlleleFrequencyAnalyzer()
63      : base() {
64      Parameters.Add(new FixedValueParameter<IntValue>(AlleleTreeDepthParameterName, "The depth of subtrees that should be considered as allele", new IntValue(2)));
65    }
66
67    public override IDeepCloneable Clone(Cloner cloner) {
68      return new SymbolicDataAnalysisAlleleFrequencyAnalyzer(this, cloner);
69    }
70
71    protected override Allele[] CalculateAlleles(ISymbolicExpressionTree solution) {
72      return CalculateAlleles(solution, AlleleTreeDepth);
73    }
74
75    public static Allele[] CalculateAlleles(ISymbolicExpressionTree solution, int alleleTreedepth) {
76      return GetAllSubtreesOfDepth(solution, alleleTreedepth)
77        .Select(t => GetAlleleFromSubtreeOfDepth(t, alleleTreedepth))
78        .ToArray();
79    }
80
81    private static Allele GetAlleleFromSubtreeOfDepth(ISymbolicExpressionTreeNode tree, int d) {
82      string textualRepresentation = GetTextualRepresentationFromSubtreeOfDepth(tree, d);
83      return new Allele(textualRepresentation);
84    }
85
86    private static string GetTextualRepresentationFromSubtreeOfDepth(ISymbolicExpressionTreeNode tree, int d) {
87      if (d == 0) return "";
88      StringBuilder builder = new StringBuilder();
89      var varTreeNode = tree as VariableTreeNode;
90      var constTreeNode = tree as ConstantTreeNode;
91      var factorVarTreeNode = tree as FactorVariableTreeNode;
92      var binFactorVarTreeNode = tree as BinaryFactorVariableTreeNode;
93      if (varTreeNode != null) {
94        builder.Append("(var " + varTreeNode.VariableName);
95      } else if (factorVarTreeNode != null) {
96        builder.Append("(factor " + factorVarTreeNode.VariableName);
97      } else if (binFactorVarTreeNode != null) {
98        builder.Append("(factor " + binFactorVarTreeNode.VariableName + "=" + binFactorVarTreeNode.VariableValue);
99      } else if (constTreeNode != null) {
100        builder.Append("(const");
101      } else {
102        builder.Append("(" + tree.ToString());
103      }
104      for (int i = 0; i < tree.SubtreeCount; i++) {
105        builder.Append(" " + GetTextualRepresentationFromSubtreeOfDepth(tree.GetSubtree(i), d - 1));
106      }
107      builder.Append(")");
108      return builder.ToString();
109    }
110
111    private static IEnumerable<ISymbolicExpressionTreeNode> GetAllSubtreesOfDepth(ISymbolicExpressionTree solution, int d) {
112      return from node in solution.IterateNodesPostfix()
113             where node.GetDepth() >= d
114             select node;
115    }
116  }
117}
Note: See TracBrowser for help on using the repository browser.