GeneticSwitch.hpp

// Unfit: Data fitting and optimization software
//
// Copyright (C) 2012- Dr Martin Buist & Dr Alberto Corrias
// Contacts: martin.buist _at_ nus.edu.sg; alberto _at_ nus.edu.sg
//
// See the 'Contributors' file for a list of those who have contributed
// to this work.
//
// This program is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program.  If not, see <http://www.gnu.org/licenses/>.
//
#ifndef UNFIT_EXAMPLES_GENETICSWITCH_HPP_
#define UNFIT_EXAMPLES_GENETICSWITCH_HPP_

#include <cmath>
#include <vector>
#include "GenericCostFunction.hpp"

namespace Unfit
{
namespace Examples
{
class GeneticSwitch : public GenericCostFunction
{
 public:
  GeneticSwitch(const std::vector<double> &z_a, double dt)
    : z_a_data_ {z_a},
      dt_ {dt}
  {}

  std::vector<double> operator() (const std::vector<double> &param)
  {
    double z_a = 10.0;          // Initial condition
    double z_b = 10.0;          // Initial condition
    auto residuals = z_a_data_;    // Residuals
    residuals[0] -= z_a;
    for (auto i = 1u; i < residuals.size(); ++i) {
      const auto l_z_a = z_a + dt_ * (param[0] / (1.0 + pow(z_b, param[1])) -
          z_a - param[2]);
      z_b += dt_ * (param[0] / (1.0 + pow(z_a, param[1])) - z_b - param[3]);
      z_a = l_z_a;
      residuals[i] -= z_a;
    }
    return residuals;
  }
 private:
  const std::vector<double> z_a_data_;
  const double dt_;
};

}  // namespace Examples
}  // namespace Unfit

#endif