Changeset 510
- Timestamp:
- 08/12/09 16:55:19 (15 years ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
library/bdm/stat/exp_family.h
r504 r510 1031 1031 }; 1032 1032 1033 class rwiWishartCh : public mpdf 1034 { 1035 protected: 1036 eiWishartCh eiW; 1033 class rwiWishartCh : public mpdf_internal<eiWishartCh> 1034 { 1035 protected: 1037 1036 //!square root of \f$ \nu-p-1 \f$ - needed for computation of \f$ \Psi \f$ from conditions 1038 1037 double sqd; … … 1043 1042 1044 1043 public: 1045 rwiWishartCh() : eiW(), 1046 sqd (0), l (0), p (0) { 1047 set_ep (eiW); 1048 } 1044 rwiWishartCh() : sqd (0), l (0), p (0) {} 1049 1045 1050 1046 void set_parameters (int p0, double k, vec ref0, double l0) { … … 1055 1051 refl = pow (ref0, 1 - l); 1056 1052 1057 eiW.set_parameters (eye (p), delta);1058 dimc = eiW.dimension();1053 iepdf.set_parameters (eye (p), delta); 1054 dimc = iepdf.dimension(); 1059 1055 } 1060 1056 void condition (const vec &c) { … … 1066 1062 } 1067 1063 1068 eiW._setY (sqd*z);1064 iepdf._setY (sqd*z); 1069 1065 } 1070 1066 };