Mercurial > octave-nkf

changeset 12750:89d41b6aa661 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
cauchy_cdf.m: Allow valid -Inf, Inf inputs. * cauchy_cdf.m: Remove unnecessary test for input x > -Inf, x < Inf.
author Rik <octave@nomad.inbox5.com>
date Fri, 17 Jun 2011 22:56:22 -0700
parents e7cc2d4a6db3
children c8f451df37a7 d9b084a3d4b0
files scripts/statistics/distributions/cauchy_cdf.m
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/statistics/distributions/cauchy_cdf.m	Thu Jun 16 21:05:10 2011 -0700
+++ b/scripts/statistics/distributions/cauchy_cdf.m	Fri Jun 17 22:56:22 2011 -0700
@@ -48,8 +48,8 @@
   sz = size (x);
   cdf = NaN (sz);
 
-  k = find ((x > -Inf) & (x < Inf) & (location > -Inf) &
-            (location < Inf) & (scale > 0) & (scale < Inf));
+  k = find ((location > -Inf) & (location < Inf)
+            & (scale > 0) & (scale < Inf));
   if (any (k))
     if (isscalar (location) && isscalar (scale))
       cdf(k) = 0.5 + atan ((x(k) - location) ./ scale) / pi;