Mercurial > mxe-octave

annotate src/armadillo-test.cpp @ 3948:1fea617cdf13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
of-odepkg: update to v0.8.5 * src/of-odepkg.mk: update version, checksum, compile if binary package * build_packages.m: add odepkg back to install script * Makefile.am: add of-odepkg back to installed of packages
author John Donoghue
date Thu, 21 May 2015 13:51:16 -0400
parents 82d1044a4434
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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 }