Mercurial > octave-nkf

changeset 12557:4715ce9f911d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
cor.m: Increase tolerance of %!tests using random data to assure passage.
author Rik <octave@nomad.inbox5.com>
date Thu, 31 Mar 2011 10:09:34 -0700
parents 88558b8eb8a7
children 1f0243949b77
files scripts/ChangeLog scripts/statistics/base/cor.m
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Thu Mar 31 09:57:11 2011 -0700
+++ b/scripts/ChangeLog	Thu Mar 31 10:09:34 2011 -0700
@@ -1,3 +1,8 @@
+2011-03-31  Rik  <octave@nomad.inbox5.com>
+
+	* statistics/base/cor.m: Increase tolerance of %!tests using random
+	data to guarantee passage.
+
 2011-03-31  Rik  <octave@nomad.inbox5.com>
 
 	* deprecated/module.mk, deprecated/cquad.m: Add deprecated entry for
--- a/scripts/statistics/base/cor.m	Thu Mar 31 09:57:11 2011 -0700
+++ b/scripts/statistics/base/cor.m	Thu Mar 31 10:09:34 2011 -0700
@@ -37,7 +37,7 @@
 
 %!test
 %! x = rand (10, 2);
-%! assert (isequal (cor (x), corrcoef (x)));
+%! assert (cor (x), corrcoef (x), 5*eps);
 %! assert (cor (x(:,1), x(:,2)) == corrcoef (x(:,1), x(:,2)));
 
 %% Test input validation