plLearnUnKLaplace.h

/*==============================================================================
 * Product        : OpenPL 
 * File           : plLearnUnKLaplace.h
 * Author         : Manuel Yguel
 * Creation       : Mon Nov 10 08:52:09 2003
 *
 *==============================================================================
 *     (c) Copyright 2003, Centre National de la Recherche Scientifique,
 *                              all rights reserved
 *==============================================================================
 *
 *------------------------- Description ----------------------------------------
 *   Learning n dimensionnal Laplaces with UNKNOWN variables definition 
 *  sets.
 *   
 *------------------------------------------------------------------------------
 */


#ifndef __plLearnUnKLaplace_h__
#define __plLearnUnKLaplace_h__


#include <plLearnUnKHistogram.h>

/* plUnKLaplaceParameters class */
class plUnKLaplaceParameters : public plUnKHistogramParameters
{
protected :
  double _lidstone;

public :
  plUnKLaplaceParameters( const plVariablesConjunction& var, 
              const plValues& min, const plValues& max, 
              double lidstone = 1.0 )
    : plUnKHistogramParameters( var, min, max ), _lidstone( lidstone ) {}
  
  plUnKLaplaceParameters( const plVariablesConjunction& var, 
              const vector<plValues>& selected_values, 
              double lidstone = 1.0  )
    : plUnKHistogramParameters( var, selected_values ), _lidstone( lidstone ) {}

  inline double getLidstone() const
  {
    return _lidstone;
  }
};


//==============================================================================
class plLearnUnKLaplace : public plLearnUnKHistogram
{

 public:
  /*CONSTRUCTORS*/
  plLearnUnKLaplace(const plLearnUnKLaplace & plLUKH);

  plLearnUnKLaplace( const plVariablesConjunction &vars );

  plLearnUnKLaplace( const plVariablesConjunction &vars,
               map< plDataValues, plLearnFrequence >*const initial,
               bool copie=false );

  plLearnUnKLaplace( const plVariablesConjunction &vars,
               const map< plDataValues, plLearnFrequence >& initial );


  /*********************/

  virtual ~plLearnUnKLaplace(){};

  void get_plProbValue( map< plDataValues,plProbValue>& prob_map_ref ) 
    const;


  void get_plProbValue( map< plDataValues,plProbValue>& prob_map_ref, 
            plLearnClassesTotal cardinality ) 
    const;

  void get_plProbValue( map< plDataValues,plProbValue>& prob_map_ref, 
            plLearnClassesTotal cardinality, double alpha )
    const;


  void select_plProbValue(vector<plProbValue>& prob_ref, 
              const vector<plValues>& selected_values ) const;

  plProbValue *
    select_plProbValue( const vector<plValues>& selected_values ) const;
  

  void select_plProbValue(vector<plProbValue>& prob_ref, 
              const vector<plValues>& selected_values,
              double alpha ) const;

  plProbValue *
    select_plProbValue( const vector<plValues>& selected_values, 
            double alpha ) const;





  void get_plProbValue(vector<plProbValue>& prob_ref, 
               const plValues& min, 
               const plValues& max) const;

  void get_plProbValue(vector<plProbValue>& prob_ref, 
               const plValues& min, 
               const plValues& max, 
               double alpha) const;
  
  plProbValue *get_plProbValue(const plValues& min, 
                   const plValues& max) const;


  plProbValue *get_plProbValue(const plValues& min, 
                   const plValues& max,
                   double alpha) const;
                               
  plKernel get_distribution( const void *parameters = NULL ) const
  {
    if(!parameters) return plKernel();
  
    vector<plProbValue> prob;
    plUnKLaplaceParameters *p =  (plUnKLaplaceParameters *)parameters;

    switch( p->getType() )
      {
      case BOUNDARY :get_plProbValue( prob, p->getMin(), p->getMax(), p->getLidstone() );break;
      case SELECT :select_plProbValue( prob, *(p->getSelectedValues()), p->getLidstone() );break;
      default :printf( "Unknown parameter type for get_distribution of plLearnUnKHistogram\n" );
        abort();
        exit(-1);
      }

    return plProbTable( p->getVar(), prob, false );
  }

};



#endif

---