Mercurial > hg > octave-nkf
changeset 11156:83da69c6e7be
Sort values in discrete_pdf before calling lookup
author | David Bateman <dbateman@free.fr> |
---|---|
date | Mon, 25 Oct 2010 21:36:29 +0200 |
parents | f0e9befd6a1c |
children | c75130f19440 |
files | scripts/ChangeLog scripts/statistics/distributions/discrete_pdf.m |
diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,8 @@ +2010-10-25 David Bateman <dbateman@free.fr> + + * statistics/distributions/discrete_pdf.m: Sort values before calling + the lookup function. + 2010-10-25 Kai Habel <kai.habel@gmx.de> * gl-render.cc (opengl_renderer::draw ): Ignore uimenu objects here.
--- a/scripts/statistics/distributions/discrete_pdf.m +++ b/scripts/statistics/distributions/discrete_pdf.m @@ -53,7 +53,8 @@ k = find (!isnan (x)); if (any (k)) n = length (k); - pdf (k) = p (lookup (v, x(k), 'm')); + [vs, vi] = sort (v); + pdf (k) = p (vi(lookup (vs, x(k), 'm'))); endif endfunction