112 lines
3.6 KiB
C++
112 lines
3.6 KiB
C++
/** -*- mode: c++; c-indent-level: 4; c++-member-init-indent: 8; comment-column: 35; -*-
|
|
|
|
-----------------------------------------------------------------------------
|
|
eoRanking.h
|
|
(c) Maarten Keijzer, Marc Schoenauer, 2001
|
|
|
|
This library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Lesser General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later version.
|
|
|
|
This 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
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
License along with this library; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
|
|
Contact: todos@geneura.ugr.es, http://geneura.ugr.es
|
|
Marc.Schoenauer@polytechnique.fr
|
|
mkeijzer@dhi.dk
|
|
*/
|
|
//-----------------------------------------------------------------------------
|
|
|
|
#ifndef eoRanking_h
|
|
#define eoRanking_h
|
|
|
|
#include <eoPerf2Worth.h>
|
|
|
|
/** An instance of eoPerfFromWorth
|
|
* COmputes the ranked fitness: fitnesses range in [m,M]
|
|
* with m=2-pressure/popSize and M=pressure/popSize.
|
|
* in between, the progression depstd::ends on exponent (linear if 1).
|
|
*
|
|
* @ingroup Selectors
|
|
*/
|
|
template <class EOT>
|
|
class eoRanking : public eoPerf2Worth<EOT> // false: do not cache fitness
|
|
{
|
|
public:
|
|
|
|
using eoPerf2Worth<EOT>::value;
|
|
|
|
/* Ctor:
|
|
@param _p selective pressure (in (1,2]
|
|
@param _e exponent (1 == linear)
|
|
*/
|
|
eoRanking(double _p=2.0, double _e=1.0):
|
|
pressure(_p), exponent(_e) {}
|
|
|
|
/* helper function: finds index in _pop of _eo, an EOT * */
|
|
int lookfor(const EOT *_eo, const eoPop<EOT>& _pop)
|
|
{
|
|
typename eoPop<EOT>::const_iterator it;
|
|
for (it=_pop.begin(); it<_pop.end(); it++)
|
|
{
|
|
if (_eo == &(*it))
|
|
return it-_pop.begin();
|
|
}
|
|
throw std::runtime_error("Not found in eoLinearRanking");
|
|
}
|
|
|
|
/* COmputes the ranked fitness: fitnesses range in [m,M]
|
|
with m=2-pressure/popSize and M=pressure/popSize.
|
|
in between, the progression depstd::ends on exponent (linear if 1).
|
|
*/
|
|
virtual void operator()(const eoPop<EOT>& _pop)
|
|
{
|
|
std::vector<const EOT *> rank;
|
|
_pop.sort(rank);
|
|
unsigned pSize =_pop.size();
|
|
unsigned int pSizeMinusOne = pSize-1;
|
|
|
|
if (pSize <= 1)
|
|
throw std::runtime_error("Cannot do ranking with population of size <= 1");
|
|
|
|
// value() refers to the std::vector of worthes (we're in an eoParamvalue)
|
|
value().resize(pSize);
|
|
|
|
double beta = (2-pressure)/pSize;
|
|
if (exponent == 1.0) // no need for exponetial then
|
|
{
|
|
double alpha = (2*pressure-2)/(pSize*pSizeMinusOne);
|
|
for (unsigned i=0; i<pSize; i++)
|
|
{
|
|
int which = lookfor(rank[i], _pop);
|
|
value()[which] = alpha*(pSize-i)+beta; // worst -> 1/[P(P-1)/2]
|
|
}
|
|
}
|
|
else // exponent != 1
|
|
{
|
|
double gamma = (2*pressure-2)/pSize;
|
|
for (unsigned i=0; i<pSize; i++)
|
|
{
|
|
int which = lookfor(rank[i], _pop);
|
|
// value in in [0,1]
|
|
double tmp = ((double)(pSize-i))/pSize;
|
|
// to the exponent, and back to [m,M]
|
|
value()[which] = gamma*pow(tmp, exponent)+beta;
|
|
}
|
|
}
|
|
}
|
|
private:
|
|
double pressure; // selective pressure
|
|
double exponent;
|
|
};
|
|
|
|
|
|
|
|
#endif
|