Mercurial > hg > octave-nkf
changeset 5691:9be68956e450
[project @ 2006-03-17 15:14:41 by jwe]
author | jwe |
---|---|
date | Fri, 17 Mar 2006 15:14:41 +0000 |
parents | 161ebd1f3410 |
children | fe226f54d259 |
files | scripts/ChangeLog scripts/deprecated/hypergeometric_rnd.m scripts/deprecated/t_rnd.m scripts/statistics/distributions/hygernd.m |
diffstat | 4 files changed, 15 insertions(+), 27 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,5 +1,10 @@ 2006-03-17 John W. Eaton <jwe@octave.org> + * deprecated/hypergeometric_rnd.m: Update interface to match + current 2.1.x version. + + * deprecated/t_rnd.m: Call trnd, not t_rnd. + * miscellaneous/dir.m: Use readdir instead of glob. Special case for "." to avoid globbing. Use list_in_columns. Eliminate unused variables len and finfo.
--- a/scripts/deprecated/hypergeometric_rnd.m +++ b/scripts/deprecated/hypergeometric_rnd.m @@ -18,30 +18,18 @@ ## 02110-1301, USA. ## -*- texinfo -*- -## @deftypefn {Function File} {} hypergeometric_rnd (@var{n_size}, @var{m}, @var{t}, @var{n}) -## @deftypefnx {Function File} {} hypergeometric_rnd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} hypergeometric_rnd (@var{m}, @var{t}, @var{n}, @var{sz}) -## Generate a row vector containing a random sample of size @var{n_size} -## from the hypergeometric distribution with parameters @var{m}, @var{t}, +## @deftypefn {Function File} {} hypergeometric_rnd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c}) +## @deftypefnx {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{sz}) +## Return an @var{r} by @var{c} matrix of random samples from the +## hypergeometric distribution with parameters @var{m}, @var{t}, ## and @var{n}. ## -## If @var{r} and @var{c} are given create a matrix with @var{r} rows and -## @var{c} columns. Or if @var{sz} is a vector, create a matrix of size -## @var{sz}. -## ## The parameters @var{m}, @var{t}, and @var{n} must positive integers ## with @var{m} and @var{n} not greater than @var{t}. ## @end deftypefn -function rnd = hypergeometric_rnd (N, m, t, n) +function rnd = hypergeometric_rnd (varargin) - switch (nargin) - case 3 - rnd = hygernd (m, t, N); - case 4 - rnd = hygernd (m, t, N, n); - otherwise - usage ("rnd = hypergeometric_rnd (N, m, t, n)"); - endswitch + rnd = hygernd (varargin{:}); endfunction
--- a/scripts/deprecated/t_rnd.m +++ b/scripts/deprecated/t_rnd.m @@ -34,6 +34,6 @@ function rnd = t_rnd (varargin) - rnd = t_rnd (varargin{:}); + rnd = trnd (varargin{:}); endfunction
--- a/scripts/statistics/distributions/hygernd.m +++ b/scripts/statistics/distributions/hygernd.m @@ -18,17 +18,12 @@ ## 02110-1301, USA. ## -*- texinfo -*- -## @deftypefn {Function File} {} hygernd (@var{n_size}, @var{m}, @var{t}, @var{n}) -## @deftypefnx {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c}) +## @deftypefn {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{r}, @var{c}) ## @deftypefnx {Function File} {} hygernd (@var{m}, @var{t}, @var{n}, @var{sz}) -## Generate a row vector containing a random sample of size @var{n_size} -## from the hypergeometric distribution with parameters @var{m}, @var{t}, +## Return an @var{r} by @var{c} matrix of random samples from the +## hypergeometric distribution with parameters @var{m}, @var{t}, ## and @var{n}. ## -## If @var{r} and @var{c} are given create a matrix with @var{r} rows and -## @var{c} columns. Or if @var{sz} is a vector, create a matrix of size -## @var{sz}. -## ## The parameters @var{m}, @var{t}, and @var{n} must positive integers ## with @var{m} and @var{n} not greater than @var{t}. ## @end deftypefn