source: trunk/yat/normalization/QuantileNormalizer.cc @ 1490

// $Id: QuantileNormalizer.cc 1487 2008-09-10 08:41:36Z jari $

/*
  Copyright (C) 2005, 2006 Jari Häkkinen, Markus Ringnér
  Copyright (C) 2007 Jari Häkkinen, Peter Johansson
  Copyright (C) 2008 Peter Johansson

  This file is part of the yat library, http://dev.thep.lu.se/yat

  The yat library 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.

  The yat library 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 yat. If not, see <http://www.gnu.org/licenses/>.
*/

#include "QuantileNormalizer.h"

#include "yat/statistics/Averager.h"

#include "yat/utility/Matrix.h"
#include "yat/utility/VectorConstView.h"

#include <cassert>

namespace theplu {
namespace yat {
namespace normalization {

  void QuantileNormalizer::operator()(const utility::Matrix& data,
                                      utility::Matrix& result) const
  {
    assert(data.rows()==result.rows());
    utility::Matrix data_copy(data);
    
    // sort columns in copy
    for (size_t column=0; column<data_copy.columns(); ++column){
      std::sort(data_copy.begin_column(column), data_copy.end_column(column));
    }

    // calculate average of each row
    std::vector<yat::statistics::Averager> averager(data_copy.rows());
    for (size_t row=0; row<data_copy.rows(); ++row){
      add(averager[row], data_copy.begin_row(row), data_copy.end_row(row));
    }

    for (size_t column=0; column<result.columns(); ++column){
      std::vector<size_t> index;
      utility::sort_index(index, result.column_const_view(column));
                               
      for (size_t row=0; row<result.rows(); ++row)
        result(index[row], column) = averager[row].mean();
    }
  }



}}} // end of namespace utility, yat and thep