source: branches/3075_aifeynman_instances/HeuristicLab.Problems.Instances.DataAnalysis/3.3/Regression/Feynman/Feynman44.cs @ 17639

using System;
using System.Collections.Generic;
using System.Linq;
using HeuristicLab.Random;

namespace HeuristicLab.Problems.Instances.DataAnalysis {
  public class Feynman44 : FeynmanDescriptor {
    public override string Name {
      get { return "Feynman I.41.16 h/(2*pi)*omega**3/(pi**2*c**2*(exp((h/(2*pi))*omega/(kb*T))-1))"; }
    }

    protected override string TargetVariable { get { return "L_rad"; } }
    protected override string[] VariableNames { get { return new[] {"omega", "T", "h", "kb", "c", "L_rad"}; } }
    protected override string[] AllowedInputVariables { get { return new[] {"omega", "T", "h", "kb", "c"}; } }

    public int Seed { get; private set; }

    public Feynman44() : this((int) DateTime.Now.Ticks) { }

    public Feynman44(int seed) {
      Seed = seed;
    }

    protected override List<List<double>> GenerateValues() {
      var rand = new MersenneTwister((uint) Seed);

      var data  = new List<List<double>>();
      var omega = ValueGenerator.GenerateUniformDistributedValues(rand.Next(), TestPartitionEnd, 1, 5).ToList();
      var T     = ValueGenerator.GenerateUniformDistributedValues(rand.Next(), TestPartitionEnd, 1, 5).ToList();
      var h     = ValueGenerator.GenerateUniformDistributedValues(rand.Next(), TestPartitionEnd, 1, 5).ToList();
      var kb    = ValueGenerator.GenerateUniformDistributedValues(rand.Next(), TestPartitionEnd, 1, 5).ToList();
      var c     = ValueGenerator.GenerateUniformDistributedValues(rand.Next(), TestPartitionEnd, 1, 5).ToList();

      var L_rad = new List<double>();

      data.Add(omega);
      data.Add(T);
      data.Add(h);
      data.Add(kb);
      data.Add(c);
      data.Add(L_rad);

      for (var i = 0; i < omega.Count; i++) {
        var res = h[i] / (2 * Math.PI) * Math.Pow(omega[i], 3) / (Math.Pow(Math.PI, 2) * Math.Pow(c[i], 2) * (Math.Exp(h[i] / (2 * Math.PI) * omega[i] / (kb[i] * T[i])) - 1));
        L_rad.Add(res);
      }

      return data;
    }
  }
}