Merge branch 'master' into trikiSA

This commit is contained in:
LPTK 2013-06-13 14:57:30 +02:00
commit 8c4e91584f
13 changed files with 653 additions and 281 deletions

View file

@ -74,6 +74,25 @@ protected:
//! Flag that marks if the individual is feasible
bool _is_feasible;
/** Flag to prevent partial initialization
*
* The reason behind the use of this flag is a bit complicated.
* Normally, we would not want to allow initialization on a scalar.
* But in MOEO, this would necessitate to re-implement most of the
* operator computing metrics, as they expect generic scalars.
*
* As this would be too much work, we use derived metric classes and
* overload them so that they initialize dual fitnesses with the
* feasibility flag. But the compiler still must compile the base
* methods, that use the scalar interface.
*
* Thus, eoDualFitness has a scalar interface, but this flag add a
* security against partial initialization. In DEBUG mode, asserts
* will fail if the feasibility has not been explicitly initialized
* at runtime.
*/
bool _feasible_init;
public:
//! Empty initialization
@ -82,58 +101,71 @@ public:
*/
eoDualFitness() :
_value(0.0),
_is_feasible(false)
_is_feasible(false),
_feasible_init(false)
{}
//! Initialization with only the value, the fitness will be unfeasible.
/*!
* WARNING: this is what is used when you initialize a new fitness from a double.
* Unfeasible by default
* If you use this interface, you MUST set the feasibility BEFORE
* asking for it or the value. Or else, an assert will fail in debug mode.
*/
template<class T>
eoDualFitness( T value ) :
_value(value),
_is_feasible(false)
_is_feasible(false),
_feasible_init(false)
{
assert( _value == 0 );
}
//! Copy constructor
eoDualFitness(const eoDualFitness& other) :
_value(other._value),
_is_feasible(other._is_feasible)
_is_feasible(other._is_feasible),
_feasible_init(true)
{}
//! Constructor from explicit value/feasibility
eoDualFitness(const BaseType& v, const bool& is_feasible) :
_value(v),
_is_feasible(is_feasible)
_is_feasible(is_feasible),
_feasible_init(true)
{}
//! From a std::pair (first element is the value, second is the feasibility)
eoDualFitness(const std::pair<BaseType,bool>& dual) :
_value(dual.first),
_is_feasible(dual.second)
_is_feasible(dual.second),
_feasible_init(true)
{}
// FIXME is it a good idea to include implicit conversion here?
/** Conversion operator: it permits to use a fitness instance as its scalar
* type, if needed. For example, this is possible:
* eoDualFitness<double,std::less<double> > fit;
* double val = 1.0;
* val = fit;
*/
operator BaseType(void) const { return _value; }
operator BaseType(void) const { return _value; }
inline bool is_feasible() const
{
assert( _feasible_init );
return _is_feasible;
}
//! Explicitly set the feasibility. Useful if you have used previously the instantiation on a single scalar.
inline void is_feasible( bool feasible )
{
this->is_feasible( feasible );
this->_feasible_init = true;
}
inline BaseType value() const
{
assert( _feasible_init );
return _value;
}
@ -141,7 +173,7 @@ public:
eoDualFitness& operator=( const std::pair<BaseType, bool>& v )
{
this->_value = v.first;
this->_is_feasible = v.second;
this->is_feasible( v.second );
return *this;
}
@ -151,21 +183,20 @@ public:
{
if (this != &other) {
this->_value = other._value;
this->_is_feasible = other._is_feasible;
this->is_feasible( other.is_feasible() );
}
return *this;
}
/*
//! Copy operator from a scalar
template<class T>
eoDualFitness& operator=(const T v)
{
this->_value = v;
this->_is_feasible = false;
this->_feasible_init = false;
return *this;
}
*/
//! Comparison that separate feasible individuals from unfeasible ones. Feasible are always better
/*!
@ -178,11 +209,11 @@ public:
// am I better (less, by default) than the other ?
// if I'm feasible and the other is not
if( this->_is_feasible && !other._is_feasible ) {
if( this->is_feasible() && !other.is_feasible() ) {
// no, the other has a better fitness
return false;
} else if( !this->_is_feasible && other._is_feasible ) {
} else if( !this->is_feasible() && other.is_feasible() ) {
// yes, a feasible fitness is always better than an unfeasible one
return true;
@ -322,7 +353,7 @@ public:
friend
std::ostream& operator<<( std::ostream& os, const eoDualFitness<BaseType,Compare> & fitness )
{
os << fitness._value << " " << fitness._is_feasible;
os << fitness._value << " " << fitness.is_feasible();
return os;
}
@ -337,7 +368,7 @@ public:
is >> feasible;
fitness._value = value;
fitness._is_feasible = feasible;
fitness.is_feasible( feasible );
return is;
}
};
@ -355,35 +386,24 @@ template< class EOT>
bool eoIsFeasible ( const EOT & sol ) { return sol.fitness().is_feasible(); }
/** Embed two eoStat and call the first one on the feasible individuals and
* the second one on the unfeasible ones, merge the two resulting value in
* a string, separated by a given marker.
/** Separate the population into two: one with only feasible individuals, the other with unfeasible ones.
*/
//template<class EOT, class T>
template<class EOT, class EOSTAT>
class eoDualStatSwitch : public eoStat< EOT, std::string >
template<class EOT>
class eoDualPopSplit : public eoUF<const eoPop<EOT>&, void>
{
protected:
eoPop<EOT> _pop_feasible;
eoPop<EOT> _pop_unfeasible;
public:
using eoStat<EOT,std::string>::value;
// eoDualStatSwitch( eoStat<EOT,T> & stat_feasible, eoStat<EOT,T> & stat_unfeasible, std::string sep=" " ) :
eoDualStatSwitch( EOSTAT & stat_feasible, EOSTAT & stat_unfeasible, std::string sep=" " ) :
eoStat<EOT,std::string>(
"?"+sep+"?",
stat_feasible.longName()+sep+stat_unfeasible.longName()
),
_stat_feasible(stat_feasible),
_stat_unfeasible(stat_unfeasible),
_sep(sep)
{ }
virtual void operator()( const eoPop<EOT> & pop )
//! Split the pop and keep them in members
void operator()( const eoPop<EOT>& pop )
{
eoPop<EOT> pop_feasible;
pop_feasible.reserve(pop.size());
_pop_feasible.clear();
_pop_feasible.reserve(pop.size());
eoPop<EOT> pop_unfeasible;
pop_unfeasible.reserve(pop.size());
_pop_unfeasible.clear();
_pop_unfeasible.reserve(pop.size());
for( typename eoPop<EOT>::const_iterator ieot=pop.begin(), iend=pop.end(); ieot!=iend; ++ieot ) {
/*
@ -392,28 +412,71 @@ public:
}
*/
if( ieot->fitness().is_feasible() ) {
pop_feasible.push_back( *ieot );
_pop_feasible.push_back( *ieot );
} else {
pop_unfeasible.push_back( *ieot );
_pop_unfeasible.push_back( *ieot );
}
}
}
_stat_feasible( pop_feasible );
_stat_unfeasible( pop_unfeasible );
//! Merge feasible and unfeasible populations into a new one
eoPop<EOT> merge() const
{
eoPop<EOT> merged;
merged.reserve( _pop_feasible.size() + _pop_unfeasible.size() );
std::copy( _pop_feasible.begin(), _pop_feasible.end(), std::back_inserter<eoPop<EOT> >(merged) );
std::copy( _pop_unfeasible.begin(), _pop_unfeasible.end(), std::back_inserter<eoPop<EOT> >(merged) );
return merged;
}
eoPop<EOT>& feasible() { return _pop_feasible; }
eoPop<EOT>& unfeasible() { return _pop_unfeasible; }
};
/** Embed two eoStat and call the first one on the feasible individuals and
* the second one on the unfeasible ones, merge the two resulting value in
* a string, separated by a given marker.
*/
template<class EOSTAT>
class eoDualStatSwitch : public eoStat< typename EOSTAT::EOType, std::string >
{
public:
typedef typename EOSTAT::EOType EOType;
protected:
EOSTAT & _stat_feasible;
EOSTAT & _stat_unfeasible;
std::string _sep;
eoDualPopSplit<EOType> _pop_split;
public:
using eoStat<EOType,std::string>::value;
eoDualStatSwitch( EOSTAT & stat_feasible, EOSTAT & stat_unfeasible, std::string sep=" " ) :
eoStat<EOType,std::string>(
"?"+sep+"?",
stat_feasible.longName()+sep+stat_unfeasible.longName()
),
_stat_feasible(stat_feasible),
_stat_unfeasible(stat_unfeasible),
_sep(sep)
{ }
virtual void operator()( const eoPop<EOType> & pop )
{
// create two separated pop in this operator
_pop_split( pop );
_stat_feasible( _pop_split.feasible() );
_stat_unfeasible( _pop_split.unfeasible() );
std::ostringstream out;
out << _stat_feasible.value() << _sep << _stat_unfeasible.value();
value() = out.str();
}
protected:
// eoStat<EOT,T> & _stat_feasible;
// eoStat<EOT,T> & _stat_unfeasible;
EOSTAT & _stat_feasible;
EOSTAT & _stat_unfeasible;
std::string _sep;
};
/** @} */

View file

@ -40,6 +40,7 @@ Contact: http://eodev.sourceforge.net
#include <eoPop.h>
#include <utils/eoMonitor.h>
//#include <utils/eoCheckPoint.h>
#include <utils/eoLogger.h>
/** @defgroup Stats Statistics computation
*
@ -84,6 +85,7 @@ template <class EOT, class T>
class eoStat : public eoValueParam<T>, public eoStatBase<EOT>
{
public:
typedef EOT EOType;
eoStat(T _value, std::string _description)
: eoValueParam<T>(_value, _description)
@ -120,6 +122,7 @@ template <class EOT, class ParamType>
class eoSortedStat : public eoSortedStatBase<EOT>, public eoValueParam<ParamType>
{
public :
typedef EOT EOType;
eoSortedStat(ParamType _value, std::string _desc) : eoValueParam<ParamType>(_value, _desc) {}
virtual std::string className(void) const { return "eoSortedStat"; }
@ -472,6 +475,51 @@ public :
};
*/
//! A robust measure of the mass (generally used to compute the median). Do not alter the given pop.
template<class EOT>
class eoNthElementStat : public eoStat< EOT, typename EOT::Fitness >
{
protected:
int _nth;
double _ratio;
public:
using eoStat<EOT, typename EOT::Fitness>::value;
eoNthElementStat( int nth = 0, std::string description = "NthElement")
: eoStat<EOT,typename EOT::Fitness>( 0.0, description ), _nth(nth), _ratio(-1.0)
{}
eoNthElementStat( double ratio = 0.5, std::string description = "Median" )
: eoStat<EOT,typename EOT::Fitness>( 0.0, description ), _nth(-1), _ratio(ratio)
{}
virtual void operator()( const eoPop<EOT> & _pop )
{
if( _nth == -1 ) { // asked for a ratio
_nth = static_cast<int>( std::floor(_pop.size() * _ratio) );
} else {
assert( _ratio == -1 ); // asked for a position
}
if( _pop.size() == 0 ) {
//FIXME how to implement value() = 0 ?
eo::log << eo::warnings << "Called " << className() << " on an empty pop, value unchanged" << std::endl;
} else {
eoPop<EOT> pop = _pop; // copy, thus no sorting of the original pop
std::nth_element( pop.begin(), pop.begin()+_nth, pop.end() );
value() = pop[_nth].fitness();
}
}
virtual std::string className(void) const { return "eoNthElementStat"; }
};
/** @example t-eoIQRStat.cpp
*/
//! A robust measure of dispersion (also called midspread or middle fifty) that is the difference between the third and the first quartile.
template<class EOT>
@ -480,12 +528,13 @@ class eoInterquartileRangeStat : public eoStat< EOT, typename EOT::Fitness >
public:
using eoStat<EOT, typename EOT::Fitness>::value;
eoInterquartileRangeStat( typename EOT::Fitness start, std::string description = "IQR" ) : eoStat<EOT,typename EOT::Fitness>( start, description ) {}
eoInterquartileRangeStat( std::string description = "IQR" ) : eoStat<EOT,typename EOT::Fitness>( 0.0, description ) {}
virtual void operator()( const eoPop<EOT> & _pop )
{
if( _pop.size() == 0 ) {
// how to implement value() = 0 ?
//FIXME how to implement value() = 0 ?
eo::log << eo::warnings << "Called " << className() << " on an empty pop, value unchanged" << std::endl;
} else {
eoPop<EOT> pop = _pop;