Mercurial > hg > octave-nkf

diff scripts/statistics/distributions/discrete_pdf.m @ 4030:22bd65326ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents 38c61cbf086c
children 4e8255035e84
line wrap: on
line diff
--- a/scripts/statistics/distributions/discrete_pdf.m
+++ b/scripts/statistics/distributions/discrete_pdf.m
@@ -35,9 +35,9 @@
 
   [r, c] = size (x);
 
-  if (! is_vector (v))
+  if (! isvector (v))
     error ("discrete_pdf: v must be a vector");
-  elseif (! is_vector (p) || (length (p) != length (v)))
+  elseif (! isvector (p) || (length (p) != length (v)))
     error ("discrete_pdf: p must be a vector with length (v) elements");
   elseif (! (all (p >= 0) && any (p)))
     error ("discrete_pdf: p must be a nonzero, nonnegative vector");