Revision 176, 0.7 kB
(checked in by smidl, 16 years ago)
|
Corrections to mixtures & merger
|
Rev | Line | |
---|
[163] | 1 | #include <itpp/itbase.h> |
---|
| 2 | #include <stat/libEF.h> |
---|
[176] | 3 | #include <estim/merger.h> |
---|
[163] | 4 | |
---|
| 5 | using namespace itpp; |
---|
| 6 | |
---|
| 7 | //These lines are needed for use of cout and endl |
---|
| 8 | using std::cout; |
---|
| 9 | using std::endl; |
---|
| 10 | |
---|
| 11 | int main() { |
---|
| 12 | |
---|
[176] | 13 | RV x ( "{x }","1" ); |
---|
[163] | 14 | |
---|
[176] | 15 | enorm<fsqmat> f1 ( x ); |
---|
| 16 | enorm<fsqmat> f2 ( x ); |
---|
[163] | 17 | |
---|
[176] | 18 | f1.set_parameters ( "-5",mat ( "2" ) ); |
---|
| 19 | f2.set_parameters ( "5",mat ( "10" ) ); |
---|
[163] | 20 | |
---|
[176] | 21 | Array<mpdf* > A ( 2 ); |
---|
| 22 | A ( 0 ) =&mepdf(f1); |
---|
| 23 | A ( 1 ) =&mepdf(f2); |
---|
| 24 | |
---|
| 25 | int Npoints=100; |
---|
| 26 | mat x_grid ( 1,Npoints ); |
---|
| 27 | x_grid.set_row ( 0,linspace ( -10.0, 10.0 ) ); |
---|
| 28 | |
---|
| 29 | vec l_f1=f1.evalpdflog_m ( x_grid ); |
---|
| 30 | |
---|
| 31 | vec l_f2=f2.evalpdflog_m ( x_grid ); |
---|
| 32 | mat lW(2,Npoints); |
---|
| 33 | lW.set_row(0, l_f1); |
---|
| 34 | lW.set_row(1, l_f2 ); |
---|
| 35 | |
---|
| 36 | merger M ( A ); |
---|
| 37 | cout << M.lognorm_merge(lW)<<endl; |
---|
[168] | 38 | // eEmp res=M.merge(100); |
---|
[163] | 39 | |
---|
[176] | 40 | |
---|
[163] | 41 | } |
---|