|
STK++ 1.0
|
00001 /*--------------------------------------------------------------------*/ 00002 /* Copyright (C) 2004-2011 Serge Iovleff 00003 00004 This program is free software; you can redistribute it and/or modify 00005 it under the terms of the GNU Lesser General Public License as 00006 published by the Free Software Foundation; either version 2 of the 00007 License, or (at your option) any later version. 00008 00009 This program is distributed in the hope that it will be useful, 00010 but WITHOUT ANY WARRANTY; without even the implied warranty of 00011 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00012 GNU Lesser General Public License for more details. 00013 00014 You should have received a copy of the GNU Lesser General Public 00015 License along with this program; if not, write to the 00016 Free Software Foundation, Inc., 00017 59 Temple Place, 00018 Suite 330, 00019 Boston, MA 02111-1307 00020 USA 00021 00022 Contact : Serge.Iovleff@stkpp.org 00023 */ 00024 00025 /* 00026 * Project: stkpp::StatModel 00027 * created on: 22 juil. 2011 00028 * Purpose: define the Interface base class IStatModelBase (Statistical Model). 00029 * Author: iovleff, serge.iovleff@stkpp.org 00030 * 00031 **/ 00032 00037 #ifndef STK_ISTATMODELBASE_H 00038 #define STK_ISTATMODELBASE_H 00039 00040 #include <cmath> 00041 00042 #include "../../Sdk/include/STK_IRunnerBase.h" 00043 #include "../../STKernel/include/STK_Real.h" 00044 #include "../../STKernel/include/STK_Integer.h" 00045 00046 namespace STK 00047 { 00048 00058 class IStatModelBase : virtual public IRunnerBase 00059 { 00060 protected: 00062 IStatModelBase(); 00063 00064 public: 00066 virtual ~IStatModelBase(); 00067 00071 inline Integer const& nbSample() const { return nbSample_;} 00072 00076 inline Integer const& nbVar() const { return nbVar_;} 00077 00081 inline Real logNbSample() const 00082 { return (nbSample_ <= 0) ? Arithmetic<Real>::NA(): log((double)nbSample_) ; 00083 } 00084 00088 inline Real logLikelihood() const { return logLikelihood_;} 00089 00093 inline Real likelihood() const 00094 { return (Arithmetic<Real>::isFinite(logLikelihood_)) ? exp((double)logLikelihood_) : 0.;} 00095 00099 inline Integer const& nbFreeParameter() const { return nbFreeParameter_;} 00100 00101 protected: 00103 Integer nbSample_; 00105 Integer nbVar_; 00107 Real logLikelihood_; 00109 Integer nbFreeParameter_; 00110 }; 00111 00112 } // namespace STK 00113 00114 #endif