Mercurial > octave

comparison scripts/statistics/tests/f_test_regression.m @ 21634:96518f623c91

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Backed out changeset dcf8922b724b
author Mike Miller <mtmiller@octave.org>
date Wed, 20 Apr 2016 11:06:03 -0700
parents dcf8922b724b
children bac0d6f07a3e
comparison
equal deleted inserted replaced
21633:dcf8922b724b 21634:96518f623c91
69 diff = rr * b - r; 69 diff = rr * b - r;
70 f = diff' * inv (rr * inv (x' * x) * rr') * diff / (q * v); 70 f = diff' * inv (rr * inv (x' * x) * rr') * diff / (q * v);
71 pval = 1 - fcdf (f, df_num, df_den); 71 pval = 1 - fcdf (f, df_num, df_den);
72 72
73 if (nargout == 0) 73 if (nargout == 0)
74 fprintf (" pval: %g\n", pval); 74 printf (" pval: %g\n", pval);
75 endif 75 endif
76 76
77 endfunction 77 endfunction
78 78