Changeset 262 for bdm/stat/libEF.cpp
- Timestamp:
- 02/09/09 23:10:36 (15 years ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
bdm/stat/libEF.cpp
r254 r262 1 #include <itpp/itbase.h> 1 2 2 #include <itpp/base/bessel.h> 3 3 #include "libEF.h" … … 87 87 88 88 } 89 90 vec egiw::variance() const { 91 92 if ( xdim==1 ) { 93 int l=V.rows(); 94 const ldmat tmp(V,linspace(1,l-1)); 95 ldmat itmp(l); 96 tmp.inv(itmp); 97 double cove = V._D() ( 0 ) / ( nu -nPsi -2*xdim -2 ); 98 99 vec var(l); 100 var.set_subvector(0,diag(itmp.to_mat())*cove); 101 var(l-1)=cove*cove/( nu -nPsi -2*xdim -2 ); 102 return var; 103 } 104 else {it_error("not implemneted"); return vec(0);} 105 } 106 89 107 void egiw::mean_mat ( mat &M, mat&R ) const { 90 108 const mat &L= V._L();