Mercurial > hg > octave-lojdl

comparison scripts/statistics/tests/cor_test.m @ 4030:22bd65326ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents 38c61cbf086c
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
4029:2cc57b6169cf 4030:22bd65326ec1
65 65
66 if ((nargin < 2) || (nargin > 4)) 66 if ((nargin < 2) || (nargin > 4))
67 usage ("cor_test (X, Y, ALTERNATIVE, METHOD)") 67 usage ("cor_test (X, Y, ALTERNATIVE, METHOD)")
68 endif 68 endif
69 69
70 if (!is_vector (X) || !is_vector (Y) || length (X) != length (Y)) 70 if (!isvector (X) || !isvector (Y) || length (X) != length (Y))
71 error ("cor_test: X and Y must be vectors of the same length") 71 error ("cor_test: X and Y must be vectors of the same length")
72 endif 72 endif
73 73
74 if (nargin < 3) 74 if (nargin < 3)
75 ALTERNATIVE = "!="; 75 ALTERNATIVE = "!=";