Mercurial > hg > octave-lyh

comparison scripts/statistics/tests/cor_test.m @ 12480:139f993936af

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uppercase variables in script error strings.
author Rik <octave@nomad.inbox5.com>
date Fri, 25 Feb 2011 20:12:05 -0800
parents fd0a3ac60b0e
children cad4cba03f19
comparison
equal deleted inserted replaced
12479:c741c1f2789e 12480:139f993936af
111 t.params = []; 111 t.params = [];
112 t.stat = sqrt (n-1) * (rho - 6/(n^3-n)); 112 t.stat = sqrt (n-1) * (rho - 6/(n^3-n));
113 t.dist = "stdnormal"; 113 t.dist = "stdnormal";
114 cdf = stdnormal_cdf (t.stat); 114 cdf = stdnormal_cdf (t.stat);
115 else 115 else
116 error ("cor_test: method `%s' not recognized", method); 116 error ("cor_test: METHOD `%s' not recognized", method);
117 endif 117 endif
118 118
119 if (strcmp (alt, "!=") || strcmp (alt, "<>")) 119 if (strcmp (alt, "!=") || strcmp (alt, "<>"))
120 t.pval = 2 * min (cdf, 1 - cdf); 120 t.pval = 2 * min (cdf, 1 - cdf);
121 elseif (strcmp (alt, ">")) 121 elseif (strcmp (alt, ">"))