Mercurial > hg > octave-lyh

changeset 12665:aa3ba343a76f stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
exppdf.m: Bug fix to extend function range to include x==0.
author Rik <octave@nomad.inbox5.com>
date Wed, 11 May 2011 10:48:04 -0700
parents 2c54fde0f397
children 68a59630798d
files scripts/statistics/distributions/exppdf.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/statistics/distributions/exppdf.m
+++ b/scripts/statistics/distributions/exppdf.m
@@ -50,7 +50,7 @@
     pdf(k) = NaN;
   endif
 
-  k = find ((x > 0) & (x < Inf) & (lambda > 0));
+  k = find ((x >= 0) & (x < Inf) & (lambda > 0));
   if (any (k))
     if isscalar (lambda)
       pdf(k) = exp (- x(k) ./ lambda) ./ lambda;