Mercurial > hg > octave-avbm

comparison scripts/statistics/distributions/betapdf.m @ 6046:34f96dd5441b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-10 16:10:25 by jwe]
author jwe
date Tue, 10 Oct 2006 16:10:31 +0000
parents 2a16423e4aa0
children 93c65f2a5668
comparison
equal deleted inserted replaced
6045:421d8a903df7 6046:34f96dd5441b
27 ## Description: PDF of the Beta distribution 27 ## Description: PDF of the Beta distribution
28 28
29 function pdf = betapdf (x, a, b) 29 function pdf = betapdf (x, a, b)
30 30
31 if (nargin != 3) 31 if (nargin != 3)
32 usage ("betapdf (a, b, x)"); 32 print_usage ();
33 endif 33 endif
34 34
35 if (!isscalar (a) || !isscalar(b)) 35 if (!isscalar (a) || !isscalar(b))
36 [retval, x, a, b] = common_size (x, a, b); 36 [retval, x, a, b] = common_size (x, a, b);
37 if (retval > 0) 37 if (retval > 0)