Mercurial > mxe-octave
annotate src/armadillo-test.cpp @ 2720:82d1044a4434
added armadillo 3.4.0 with test
author | Christian Frisson <christian.frisson@gmail.com> |
---|---|
date | Sun, 09 Sep 2012 17:01:46 +0200 |
parents | |
children |
rev | line source |
---|---|
2720
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
1 /* |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
2 * This file is part of MXE. |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
3 * See index.html for further information. |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
4 */ |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
5 |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
6 #include <armadillo> |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
7 |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
8 using namespace arma; |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
9 |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
10 int main() |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
11 { |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
12 mat A = randu<mat>(50,50); |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
13 mat B = trans(A)*A; // generate a symmetric matrix |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
14 |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
15 vec eigval; |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
16 mat eigvec; |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
17 |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
18 // use standard algorithm by default |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
19 eig_sym(eigval, eigvec, B); |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
20 |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
21 // use divide & conquer algorithm |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
22 eig_sym(eigval, eigvec, B, "dc"); |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
23 return 0; |
82d1044a4434
added armadillo 3.4.0 with test
Christian Frisson <christian.frisson@gmail.com>
parents:
diff
changeset
|
24 } |