Mercurial > hg > octave-nkf

comparison scripts/statistics/base/cov.m @ 7939:18d7171759ff

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[mq]: covtest
author Jaroslav Hajek <highegg@gmail.com>
date Thu, 17 Jul 2008 11:57:56 +0200
parents 83a8781b529d
children eb63fbe60fab
comparison
equal deleted inserted replaced
7938:bf4a04ebff21 7939:18d7171759ff
69 69
70 %!test 70 %!test
71 %! x = rand (10); 71 %! x = rand (10);
72 %! cx1 = cov (x); 72 %! cx1 = cov (x);
73 %! cx2 = cov (x, x); 73 %! cx2 = cov (x, x);
74 %! assert(size (cx1) == [10, 10] && size (cx2) == [10, 10] && cx1 == cx2); 74 %! assert(size (cx1) == [10, 10] && size (cx2) == [10, 10] && norm(cx1-cx2) < 1e1*eps);
75 75
76 %!error cov (); 76 %!error cov ();
77 77
78 %!error cov (1, 2, 3); 78 %!error cov (1, 2, 3);
79 79