# HG changeset patch # User John W. Eaton # Date 1264765658 18000 # Node ID 9b4d35fd1897a24255d2cb15e15af9c0039b37f8 # Parent 04f2b4d68eba54507a5450697d22e0fe3d0d3e72 delete functions deprecated in version 3.0.0 diff --git a/scripts/ChangeLog b/scripts/ChangeLog --- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,51 @@ +2010-01-29 John W. Eaton + + * deprecated/beta_cdf.m, deprecated/beta_inv.m, + deprecated/beta_pdf.m, deprecated/beta_rnd.m, + deprecated/binomial_cdf.m, deprecated/binomial_inv.m, + deprecated/binomial_pdf.m, deprecated/binomial_rnd.m, + deprecated/chisquare_cdf.m, deprecated/chisquare_inv.m, + deprecated/chisquare_pdf.m, deprecated/chisquare_rnd.m, + deprecated/clearplot.m, deprecated/com2str.m, + deprecated/exponential_cdf.m, deprecated/exponential_inv.m, + deprecated/exponential_pdf.m, deprecated/exponential_rnd.m, + deprecated/f_cdf.m, deprecated/f_inv.m, deprecated/f_pdf.m, + deprecated/f_rnd.m, deprecated/gamma_cdf.m, + deprecated/gamma_inv.m, deprecated/gamma_pdf.m, + deprecated/gamma_rnd.m, deprecated/geometric_cdf.m, + deprecated/geometric_inv.m, deprecated/geometric_pdf.m, + deprecated/geometric_rnd.m, deprecated/hypergeometric_cdf.m, + deprecated/hypergeometric_inv.m, + deprecated/hypergeometric_pdf.m, + deprecated/hypergeometric_rnd.m, deprecated/intersection.m, + deprecated/is_bool.m, deprecated/is_complex.m, + deprecated/is_list.m, deprecated/is_matrix.m, + deprecated/is_scalar.m, deprecated/is_square.m, + deprecated/is_stream.m, deprecated/is_struct.m, + deprecated/is_symmetric.m, deprecated/is_vector.m, + deprecated/lognormal_cdf.m, deprecated/lognormal_inv.m, + deprecated/lognormal_pdf.m, deprecated/lognormal_rnd.m, + deprecated/meshdom.m, deprecated/normal_cdf.m, + deprecated/normal_inv.m, deprecated/normal_pdf.m, + deprecated/normal_rnd.m, deprecated/pascal_cdf.m, + deprecated/pascal_inv.m, deprecated/pascal_pdf.m, + deprecated/pascal_rnd.m, deprecated/poisson_cdf.m, + deprecated/poisson_inv.m, deprecated/poisson_pdf.m, + deprecated/poisson_rnd.m, deprecated/polyinteg.m, + deprecated/struct_contains.m, deprecated/struct_elements.m, + deprecated/t_cdf.m, deprecated/t_inv.m, deprecated/t_pdf.m, + deprecated/t_rnd.m, deprecated/uniform_cdf.m, + deprecated/uniform_inv.m, deprecated/uniform_pdf.m, + deprecated/uniform_rnd.m, deprecated/weibull_cdf.m, + deprecated/weibull_inv.m, deprecated/weibull_pdf.m, + deprecated/weibull_rnd.m, deprecated/wiener_rnd.m: + Delete functions deprecated in version 3.0.0. + + * deprecated/weibcdf.m, deprecated/weibinv.m, + deprecated/weibpdf.m, deprecated/weibrnd.m: + Note that Matlab still has these functions, so they probabl + should not be removed with other functions deprecated in 3.0.0. + 2010-01-28 Ben Abbott * plot/daspect.m, plot/pbaspect.m: New functions. diff --git a/scripts/deprecated/beta_cdf.m b/scripts/deprecated/beta_cdf.m deleted file mode 100644 --- a/scripts/deprecated/beta_cdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} beta_cdf (@var{x}, @var{a}, @var{b}) -## For each element of @var{x}, returns the CDF at @var{x} of the beta -## distribution with parameters @var{a} and @var{b}, i.e., -## PROB (beta (@var{a}, @var{b}) <= @var{x}). -## @end deftypefn - -## Author: KH -## Description: CDF of the Beta distribution - -## Deprecated in version 3.0 - -function cdf = beta_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "beta_cdf is obsolete and will be removed from a future version of Octave; please use betacdf instead"); - endif - - cdf = betacdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/beta_inv.m b/scripts/deprecated/beta_inv.m deleted file mode 100644 --- a/scripts/deprecated/beta_inv.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} beta_inv (@var{x}, @var{a}, @var{b}) -## For each component of @var{x}, compute the quantile (the inverse of -## the CDF) at @var{x} of the Beta distribution with parameters @var{a} -## and @var{b}. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the Beta distribution - -## Deprecated in version 3.0 - -function inv = beta_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "beta_inv is obsolete and will be removed from a future version of Octave; please use betainv instead"); - endif - - inv = betainv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/beta_pdf.m b/scripts/deprecated/beta_pdf.m deleted file mode 100644 --- a/scripts/deprecated/beta_pdf.m +++ /dev/null @@ -1,41 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} beta_pdf (@var{x}, @var{a}, @var{b}) -## For each element of @var{x}, returns the PDF at @var{x} of the beta -## distribution with parameters @var{a} and @var{b}. -## @end deftypefn - -## Author: KH -## Description: PDF of the Beta distribution - -## Deprecated in version 3.0 - -function pdf = beta_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "beta_pdf is obsolete and will be removed from a future version of Octave; please use betapdf instead"); - endif - - pdf = betapdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/beta_rnd.m b/scripts/deprecated/beta_rnd.m deleted file mode 100644 --- a/scripts/deprecated/beta_rnd.m +++ /dev/null @@ -1,47 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} beta_rnd (@var{a}, @var{b}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} beta_rnd (@var{a}, @var{b}, @var{sz}) -## Return an @var{r} by @var{c} or @code{size (@var{sz})} matrix of -## random samples from the Beta distribution with parameters @var{a} and -## @var{b}. Both @var{a} and @var{b} must be scalar or of size @var{r} -## by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{a} and @var{b}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the Beta distribution - -## Deprecated in version 3.0 - -function rnd = beta_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "beta_rnd is obsolete and will be removed from a future version of Octave; please use betarnd instead"); - endif - - rnd = betarnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/binomial_cdf.m b/scripts/deprecated/binomial_cdf.m deleted file mode 100644 --- a/scripts/deprecated/binomial_cdf.m +++ /dev/null @@ -1,41 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} binomial_cdf (@var{x}, @var{n}, @var{p}) -## For each element of @var{x}, compute the CDF at @var{x} of the -## binomial distribution with parameters @var{n} and @var{p}. -## @end deftypefn - -## Author: KH -## Description: CDF of the binomial distribution - -## Deprecated in version 3.0 - -function cdf = binomial_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "binomial_cdf is obsolete and will be removed from a future version of Octave; please use binocdf instead"); - endif - - cdf = binocdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/binomial_inv.m b/scripts/deprecated/binomial_inv.m deleted file mode 100644 --- a/scripts/deprecated/binomial_inv.m +++ /dev/null @@ -1,41 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} binomial_inv (@var{x}, @var{n}, @var{p}) -## For each element of @var{x}, compute the quantile at @var{x} of the -## binomial distribution with parameters @var{n} and @var{p}. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the binomial distribution - -## Deprecated in version 3.0 - -function inv = binomial_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "binomial_inv is obsolete and will be removed from a future version of Octave; please use binoinv instead"); - endif - - inv = binoinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/binomial_pdf.m b/scripts/deprecated/binomial_pdf.m deleted file mode 100644 --- a/scripts/deprecated/binomial_pdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} binomial_pdf (@var{x}, @var{n}, @var{p}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the binomial distribution with parameters @var{n} -## and @var{p}. -## @end deftypefn - -## Author: KH -## Description: PDF of the binomial distribution - -## Deprecated in version 3.0 - -function pdf = binomial_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "binomial_pdf is obsolete and will be removed from a future version of Octave; please use binopdf instead"); - endif - - pdf = binopdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/binomial_rnd.m b/scripts/deprecated/binomial_rnd.m deleted file mode 100644 --- a/scripts/deprecated/binomial_rnd.m +++ /dev/null @@ -1,47 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} binomial_rnd (@var{n}, @var{p}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} binomial_rnd (@var{n}, @var{p}, @var{sz}) -## Return an @var{r} by @var{c} or a @code{size (@var{sz})} matrix of -## random samples from the binomial distribution with parameters @var{n} -## and @var{p}. Both @var{n} and @var{p} must be scalar or of size -## @var{r} by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{n} and @var{p}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the binomial distribution - -## Deprecated in version 3.0 - -function rnd = binomial_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "binomial_rnd is obsolete and will be removed from a future version of Octave; please use binornd instead"); - endif - - rnd = binornd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/chisquare_cdf.m b/scripts/deprecated/chisquare_cdf.m deleted file mode 100644 --- a/scripts/deprecated/chisquare_cdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} chisquare_cdf (@var{x}, @var{n}) -## For each element of @var{x}, compute the cumulative distribution -## function (CDF) at @var{x} of the chisquare distribution with @var{n} -## degrees of freedom. -## @end deftypefn - -## Author: TT -## Description: CDF of the chi-square distribution - -## Deprecated in version 3.0 - -function cdf = chisquare_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "chisquare_cdf is obsolete and will be removed from a future version of Octave; please use chi2cdf instead"); - endif - - cdf = chi2cdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/chisquare_inv.m b/scripts/deprecated/chisquare_inv.m deleted file mode 100644 --- a/scripts/deprecated/chisquare_inv.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} chisquare_inv (@var{x}, @var{n}) -## For each element of @var{x}, compute the quantile (the inverse of the -## CDF) at @var{x} of the chisquare distribution with @var{n} degrees of -## freedom. -## @end deftypefn - -## Author: TT -## Description: Quantile function of the chi-square distribution - -## Deprecated in version 3.0 - -function inv = chisquare_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "chisquare_inv is obsolete and will be removed from a future version of Octave; please use chi2inv instead"); - endif - - inv = chi2inv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/chisquare_pdf.m b/scripts/deprecated/chisquare_pdf.m deleted file mode 100644 --- a/scripts/deprecated/chisquare_pdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2006, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} chisquare_pdf (@var{x}, @var{n}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the chisquare distribution with @var{n} degrees -## of freedom. -## @end deftypefn - -## Author: TT -## Description: PDF of the chi-sqaure distribution - -## Deprecated in version 3.0 - -function pdf = chisquare_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "chisquare_pdf is obsolete and will be removed from a future version of Octave; please use chi2pdf instead"); - endif - - pdf = chi2pdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/chisquare_rnd.m b/scripts/deprecated/chisquare_rnd.m deleted file mode 100644 --- a/scripts/deprecated/chisquare_rnd.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} chisquare_rnd (@var{n}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} chisquare_rnd (@var{n}, @var{sz}) -## Return an @var{r} by @var{c} or a @code{size (@var{sz})} matrix of -## random samples from the chisquare distribution with @var{n} degrees -## of freedom. @var{n} must be a scalar or of size @var{r} by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the size of @var{n}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the chi-square distribution - -## Deprecated in version 3.0 - -function rnd = chisquare_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "chisquare_rnd is obsolete and will be removed from a future version of Octave; please use chi2rnd instead"); - endif - - rnd = chi2rnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/clearplot.m b/scripts/deprecated/clearplot.m deleted file mode 100644 --- a/scripts/deprecated/clearplot.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2006, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} clearplot () -## This function has been deprecated. Use clf instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function clearplot () - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "clearplot is obsolete and will be removed from a future version of Octave; please use clf instead"); - endif - - clf (); - -endfunction diff --git a/scripts/deprecated/com2str.m b/scripts/deprecated/com2str.m deleted file mode 100644 --- a/scripts/deprecated/com2str.m +++ /dev/null @@ -1,93 +0,0 @@ -## Copyright (C) 1998, 2004, 2005, 2006, 2007, 2008 -## Auburn University. All rights reserved. -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} com2str (@var{zz}, @var{flg}) -## This function has been deprecated. Use num2str instead. -## -## Convert complex number to a string. -## @strong{Inputs} -## @table @var -## @item zz -## complex number -## @item flg -## format flag -## 0 (default): -1, 0, 1, 1i, 1 + 0.5i -## 1 (for use with zpout): -1, 0, + 1, + 1i, + 1 + 0.5i -## @end table -## @end deftypefn - -## Deprecated in version 3.0 - -function retval = com2str (zz, flg) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "com2str is obsolete and will be removed from a future version of Octave; please use num2str instead"); - endif - - if (nargin < 1 || nargin > 2) - print_usage (); - endif - if (nargin == 1) - flg = 0; - endif - - if (! (isscalar (zz) && isscalar (flg))) - error ("com2str: arguments must be a scalar"); - endif - - if (flg != 0 && flg != 1) - error ("invalid flg value: %d", flg); - endif - - sgns = "+-"; - rz = real (zz); - iz = imag (zz); - az = abs (zz); - if (iz == 0) - ## strictly a real number - switch (flg) - case(0) - retval = num2str (rz); - case(1) - retval = [sgns(1+(rz<0)), " ", num2str(abs(rz))]; - endswitch - elseif (rz == 0) - ## strictly an imaginary number - switch (flg) - case(0) - retval = [num2str(iz), "i"]; - case(1) - retval = [sgns(1+(iz<0)), " ", num2str(abs(iz)), "i"]; - endswitch - else - ## complex number - ## strictly an imaginary number - switch (flg) - case(0) - retval = [num2str(rz), " ", com2str(i*iz,1)]; - case(1) - retval = [sgns(1+(rz<0)), " ", num2str(abs(rz)), " ", com2str(i*iz,1)]; - endswitch - endif - -endfunction diff --git a/scripts/deprecated/exponential_cdf.m b/scripts/deprecated/exponential_cdf.m deleted file mode 100644 --- a/scripts/deprecated/exponential_cdf.m +++ /dev/null @@ -1,48 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} exponential_cdf (@var{x}, @var{lambda}) -## For each element of @var{x}, compute the cumulative distribution -## function (CDF) at @var{x} of the exponential distribution with -## parameter @var{lambda}. -## -## The arguments can be of common size or scalar. -## @end deftypefn - -## Author: KH -## Description: CDF of the exponential distribution - -## Deprecated in version 3.0 - -function cdf = exponential_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "exponential_cdf is obsolete and will be removed from a future version of Octave; please use expcdf instead"); - endif - - if (nargin > 1) - varargin{2} = 1 ./ varargin{2}; - endif - - cdf = expcdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/exponential_inv.m b/scripts/deprecated/exponential_inv.m deleted file mode 100644 --- a/scripts/deprecated/exponential_inv.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} exponential_inv (@var{x}, @var{lambda}) -## For each element of @var{x}, compute the quantile (the inverse of the -## CDF) at @var{x} of the exponential distribution with parameter -## @var{lambda}. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the exponential distribution - -## Deprecated in version 3.0 - -function inv = exponential_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "exponential_inv is obsolete and will be removed from a future version of Octave; please use expinv instead"); - endif - - if (nargin > 1) - varargin{2} = 1 ./ varargin{2}; - endif - - inv = expinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/exponential_pdf.m b/scripts/deprecated/exponential_pdf.m deleted file mode 100644 --- a/scripts/deprecated/exponential_pdf.m +++ /dev/null @@ -1,45 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} exponential_pdf (@var{x}, @var{lambda}) -## For each element of @var{x}, compute the probability density function -## (PDF) of the exponential distribution with parameter @var{lambda}. -## @end deftypefn - -## Author: KH -## Description: PDF of the exponential distribution - -## Deprecated in version 3.0 - -function pdf = exponential_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "exponential_pdf is obsolete and will be removed from a future version of Octave; please use exppdf instead"); - endif - - if (nargin > 1) - varargin{2} = 1 ./ varargin{2}; - endif - - pdf = exppdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/exponential_rnd.m b/scripts/deprecated/exponential_rnd.m deleted file mode 100644 --- a/scripts/deprecated/exponential_rnd.m +++ /dev/null @@ -1,51 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008, 2009 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} exponential_rnd (@var{lambda}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} exponential_rnd (@var{lambda}, @var{sz}) -## Return an @var{r} by @var{c} matrix of random samples from the -## exponential distribution with parameter @var{lambda}, which must be a -## scalar or of size @var{r} by @var{c}. Or if @var{sz} is a vector, -## create a matrix of size @var{sz}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the size of @var{lambda}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the exponential distribution - -## Deprecated in version 3.0 - -function rnd = exponential_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "exponential_rnd is obsolete and will be removed from a future version of Octave; please use exprnd instead"); - endif - - if (nargin > 0) - varargin{1} = 1 ./ varargin{1}; - endif - - rnd = exprnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/f_cdf.m b/scripts/deprecated/f_cdf.m deleted file mode 100644 --- a/scripts/deprecated/f_cdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} f_cdf (@var{x}, @var{m}, @var{n}) -## For each element of @var{x}, compute the CDF at @var{x} of the F -## distribution with @var{m} and @var{n} degrees of freedom, i.e., -## PROB (F (@var{m}, @var{n}) <= @var{x}). -## @end deftypefn - -## Author: KH -## Description: CDF of the F distribution - -## Deprecated in version 3.0 - -function cdf = f_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "f_cdf is obsolete and will be removed from a future version of Octave; please use fcdf instead"); - endif - - cdf = fcdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/f_inv.m b/scripts/deprecated/f_inv.m deleted file mode 100644 --- a/scripts/deprecated/f_inv.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} f_inv (@var{x}, @var{m}, @var{n}) -## For each component of @var{x}, compute the quantile (the inverse of -## the CDF) at @var{x} of the F distribution with parameters @var{m} and -## @var{n}. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the F distribution - -## Deprecated in version 3.0 - -function inv = f_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "f_inv is obsolete and will be removed from a future version of Octave; please use finv instead"); - endif - - inv = finv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/f_pdf.m b/scripts/deprecated/f_pdf.m deleted file mode 100644 --- a/scripts/deprecated/f_pdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} f_pdf (@var{x}, @var{m}, @var{n}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the F distribution with @var{m} and @var{n} -## degrees of freedom. -## @end deftypefn - -## Author: KH -## Description: PDF of the F distribution - -## Deprecated in version 3.0 - -function pdf = f_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "f_pdf is obsolete and will be removed from a future version of Octave; please use fpdf instead"); - endif - - pdf = fpdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/f_rnd.m b/scripts/deprecated/f_rnd.m deleted file mode 100644 --- a/scripts/deprecated/f_rnd.m +++ /dev/null @@ -1,48 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} f_rnd (@var{m}, @var{n}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} f_rnd (@var{m}, @var{n}, @var{sz}) -## Return an @var{r} by @var{c} matrix of random samples from the F -## distribution with @var{m} and @var{n} degrees of freedom. Both -## @var{m} and @var{n} must be scalar or of size @var{r} by @var{c}. -## If @var{sz} is a vector the random samples are in a matrix of -## size @var{sz}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{m} and @var{n}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the F distribution - -## Deprecated in version 3.0 - -function rnd = f_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "f_rnd is obsolete and will be removed from a future version of Octave; please use frnd instead"); - endif - - rnd = frnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/gamma_cdf.m b/scripts/deprecated/gamma_cdf.m deleted file mode 100644 --- a/scripts/deprecated/gamma_cdf.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} gamma_cdf (@var{x}, @var{a}, @var{b}) -## For each element of @var{x}, compute the cumulative distribution -## function (CDF) at @var{x} of the Gamma distribution with parameters -## @var{a} and @var{b}. -## @end deftypefn - -## Author: TT -## Description: CDF of the Gamma distribution - -## Deprecated in version 3.0 - -function cdf = gamma_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "gamma_cdf is obsolete and will be removed from a future version of Octave; please use gamcdf instead"); - endif - - if (nargin > 2) - varargin{3} = 1 ./ varargin{3}; - endif - - cdf = gamcdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/gamma_inv.m b/scripts/deprecated/gamma_inv.m deleted file mode 100644 --- a/scripts/deprecated/gamma_inv.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} gamma_inv (@var{x}, @var{a}, @var{b}) -## For each component of @var{x}, compute the quantile (the inverse of -## the CDF) at @var{x} of the Gamma distribution with parameters @var{a} -## and @var{b}. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the Gamma distribution - -## Deprecated in version 3.0 - -function inv = gamma_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "gamma_inv is obsolete and will be removed from a future version of Octave; please use gaminv instead"); - endif - - if (nargin > 2) - varargin{3} = 1 ./ varargin{3}; - endif - - inv = gaminv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/gamma_pdf.m b/scripts/deprecated/gamma_pdf.m deleted file mode 100644 --- a/scripts/deprecated/gamma_pdf.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} gamma_pdf (@var{x}, @var{a}, @var{b}) -## For each element of @var{x}, return the probability density function -## (PDF) at @var{x} of the Gamma distribution with parameters @var{a} -## and @var{b}. -## @end deftypefn - -## Author: TT -## Description: PDF of the Gamma distribution - -## Deprecated in version 3.0 - -function pdf = gamma_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "gamma_pdf is obsolete and will be removed from a future version of Octave; please use gampdf instead"); - endif - - if (nargin > 2) - varargin{3} = 1 ./ varargin{3}; - endif - - pdf = gampdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/gamma_rnd.m b/scripts/deprecated/gamma_rnd.m deleted file mode 100644 --- a/scripts/deprecated/gamma_rnd.m +++ /dev/null @@ -1,51 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} gamma_rnd (@var{a}, @var{b}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} gamma_rnd (@var{a}, @var{b}, @var{sz}) -## Return an @var{r} by @var{c} or a @code{size (@var{sz})} matrix of -## random samples from the Gamma distribution with parameters @var{a} -## and @var{b}. Both @var{a} and @var{b} must be scalar or of size -## @var{r} by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{a} and @var{b}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the Gamma distribution - -## Deprecated in version 3.0 - -function rnd = gamma_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "gamma_rnd is obsolete and will be removed from a future version of Octave; please use gamrnd instead"); - endif - - if (nargin > 1) - varargin{2} = 1 ./ varargin{2}; - endif - - rnd = gamrnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/geometric_cdf.m b/scripts/deprecated/geometric_cdf.m deleted file mode 100644 --- a/scripts/deprecated/geometric_cdf.m +++ /dev/null @@ -1,41 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} geometric_cdf (@var{x}, @var{p}) -## For each element of @var{x}, compute the CDF at @var{x} of the -## geometric distribution with parameter @var{p}. -## @end deftypefn - -## Author: KH -## Description: CDF of the geometric distribution - -## Deprecated in version 3.0 - -function cdf = geometric_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "geometric_cdf is obsolete and will be removed from a future version of Octave; please use geocdf instead"); - endif - - cdf = geocdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/geometric_inv.m b/scripts/deprecated/geometric_inv.m deleted file mode 100644 --- a/scripts/deprecated/geometric_inv.m +++ /dev/null @@ -1,41 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} geometric_inv (@var{x}, @var{p}) -## For each element of @var{x}, compute the quantile at @var{x} of the -## geometric distribution with parameter @var{p}. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the geometric distribution - -## Deprecated in version 3.0 - -function inv = geometric_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "geometric_inv is obsolete and will be removed from a future version of Octave; please use geoinv instead"); - endif - - inv = geoinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/geometric_pdf.m b/scripts/deprecated/geometric_pdf.m deleted file mode 100644 --- a/scripts/deprecated/geometric_pdf.m +++ /dev/null @@ -1,41 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} geometric_pdf (@var{x}, @var{p}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the geometric distribution with parameter @var{p}. -## @end deftypefn - -## Author: KH -## Description: PDF of the geometric distribution - -## Deprecated in version 3.0 - -function pdf = geometric_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "geometric_pdf is obsolete and will be removed from a future version of Octave; please use geopdf instead"); - endif - - pdf = geopdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/geometric_rnd.m b/scripts/deprecated/geometric_rnd.m deleted file mode 100644 --- a/scripts/deprecated/geometric_rnd.m +++ /dev/null @@ -1,47 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008, 2009 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} geometric_rnd (@var{p}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} geometric_rnd (@var{p}, @var{sz}) -## Return an @var{r} by @var{c} matrix of random samples from the -## geometric distribution with parameter @var{p}, which must be a scalar -## or of size @var{r} by @var{c}. -## -## 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}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the geometric distribution - -## Deprecated in version 3.0 - -function rnd = geometric_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "geometric_rnd is obsolete and will be removed from a future version of Octave; please use geornd instead"); - endif - - rnd = geornd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/hypergeometric_cdf.m b/scripts/deprecated/hypergeometric_cdf.m deleted file mode 100644 --- a/scripts/deprecated/hypergeometric_cdf.m +++ /dev/null @@ -1,50 +0,0 @@ -## Copyright (C) 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} hypergeometric_cdf (@var{x}, @var{m}, @var{t}, @var{n}) -## Compute the cumulative distribution function (CDF) at @var{x} of the -## hypergeometric distribution with parameters @var{m}, @var{t}, and -## @var{n}. This is the probability of obtaining not more than @var{x} -## marked items when randomly drawing a sample of size @var{n} without -## replacement from a population of total size @var{t} containing -## @var{m} marked items. -## -## 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 - -## Author: KH -## Description: CDF of the hypergeometric distribution - -## Deprecated in version 3.0 - -function cdf = hypergeometric_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "hypergeometric_cdf is obsolete and will be removed from a future version of Octave; please use hygecdf instead"); - endif - - cdf = hygecdf (varargin{:}); - -endfunction - - diff --git a/scripts/deprecated/hypergeometric_inv.m b/scripts/deprecated/hypergeometric_inv.m deleted file mode 100644 --- a/scripts/deprecated/hypergeometric_inv.m +++ /dev/null @@ -1,45 +0,0 @@ -## Copyright (C) 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} hypergeometric_inv (@var{x}, @var{m}, @var{t}, @var{n}) -## For each element of @var{x}, compute the quantile at @var{x} of the -## hypergeometric distribution with parameters @var{m}, @var{t}, and -## @var{n}. -## -## 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 - -## Author: KH -## Description: Random deviates from the hypergeometric distribution - -## Deprecated in version 3.0 - -function inv = hypergeometric_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "hypergeometric_inv is obsolete and will be removed from a future version of Octave; please use hygeinv instead"); - endif - - inv = hygeinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/hypergeometric_pdf.m b/scripts/deprecated/hypergeometric_pdf.m deleted file mode 100644 --- a/scripts/deprecated/hypergeometric_pdf.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1996, 1997, 2005, 2007, 2008, 2009 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} hypergeometric_pdf (@var{x}, @var{m}, @var{t}, @var{n}) -## Compute the probability density function (PDF) at @var{x} of the -## hypergeometric distribution with parameters @var{m}, @var{t}, and -## @var{n}. This is the probability of obtaining @var{x} marked items -## when randomly drawing a sample of size @var{n} without replacement -## from a population of total size @var{t} containing @var{m} marked items. -## -## The arguments must be of common size or scalar. -## @end deftypefn - -## Author: KH -## Description: PDF of the hypergeometric distribution - -## Deprecated in version 3.0 - -function pdf = hypergeometric_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "hypergeometric_pdf is obsolete and will be removed from a future version of Octave; please use hygepdf instead"); - endif - - pdf = hygepdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/hypergeometric_rnd.m b/scripts/deprecated/hypergeometric_rnd.m deleted file mode 100644 --- a/scripts/deprecated/hypergeometric_rnd.m +++ /dev/null @@ -1,43 +0,0 @@ -## Copyright (C) 1997, 2005, 2006, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @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}. -## -## 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 - -## Deprecated in version 3.0 - -function rnd = hypergeometric_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "hypergeometric_rnd is obsolete and will be removed from a future version of Octave; please use hygernd instead"); - endif - - rnd = hygernd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/intersection.m b/scripts/deprecated/intersection.m deleted file mode 100644 --- a/scripts/deprecated/intersection.m +++ /dev/null @@ -1,50 +0,0 @@ -## Copyright (C) 1996, 1997, 2006, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} intersection (@var{x}, @var{y}) -## This function has been deprecated. Use intersect instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function y = intersection (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "intersection is obsolete and will be removed from a future version of Octave; please use intersect instead"); - endif - - y = intersect (varargin{:}); - -endfunction - -%!assert(all (all (intersection ([1, 2, 3], [2, 3, 5]) == [2, 3]))); - -%!assert(all (all (intersection ([1; 2; 3], [2, 3, 5]) == [2, 3]))); - -%!assert(isempty (intersection ([1, 2, 3], [4; 5; 6]))); - -%!error intersection (1); - -%!error intersection (1, 2, 5); - diff --git a/scripts/deprecated/is_bool.m b/scripts/deprecated/is_bool.m deleted file mode 100644 --- a/scripts/deprecated/is_bool.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_bool (@var{a}) -## This function has been deprecated. Use isbool instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_bool (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_bool is obsolete and will be removed from a future version of Octave; please use isbool instead"); - endif - - retval = isbool (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_complex.m b/scripts/deprecated/is_complex.m deleted file mode 100644 --- a/scripts/deprecated/is_complex.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_complex (@var{a}) -## This function has been deprecated. Use iscomplex instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_complex (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_complex is obsolete and will be removed from a future version of Octave; please use iscomplex instead"); - endif - - retval = iscomplex (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_list.m b/scripts/deprecated/is_list.m deleted file mode 100644 --- a/scripts/deprecated/is_list.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_list (@var{a}) -## This function has been deprecated. Use islist instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_list (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_list is obsolete and will be removed from a future version of Octave; please use islist instead"); - endif - - retval = islist (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_matrix.m b/scripts/deprecated/is_matrix.m deleted file mode 100644 --- a/scripts/deprecated/is_matrix.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_matrix (@var{a}) -## This function has been deprecated. Use ismatrix instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_matrix (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_matrix is obsolete and will be removed from a future version of Octave; please use ismatrix instead"); - endif - - retval = ismatrix (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_scalar.m b/scripts/deprecated/is_scalar.m deleted file mode 100644 --- a/scripts/deprecated/is_scalar.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 1996, 1997, 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_scalar (@var{a}) -## This function has been deprecated. Use isscalar instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_scalar (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_scalar is obsolete and will be removed from a future version of Octave; please use isscalar instead"); - endif - - retval = isscalar (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_square.m b/scripts/deprecated/is_square.m deleted file mode 100644 --- a/scripts/deprecated/is_square.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 1996, 1997, 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_square (@var{x}) -## This function has been deprecated. Use issquare instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_square (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_square is obsolete and will be removed from a future version of Octave; please use issquare instead"); - endif - - retval = issquare (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_stream.m b/scripts/deprecated/is_stream.m deleted file mode 100644 --- a/scripts/deprecated/is_stream.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_stream (@var{a}) -## This function has been deprecated. Use isstream instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_stream (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_stream is obsolete and will be removed from a future version of Octave; please use isstream instead"); - endif - - retval = isstream(varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_struct.m b/scripts/deprecated/is_struct.m deleted file mode 100644 --- a/scripts/deprecated/is_struct.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_struct (@var{a}) -## This function has been deprecated. Use isstruct instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_struct (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_struct is obsolete and will be removed from a future version of Octave; please use isstruct instead"); - endif - - retval = isstruct (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_symmetric.m b/scripts/deprecated/is_symmetric.m deleted file mode 100644 --- a/scripts/deprecated/is_symmetric.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 1996, 1997, 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} issymmetric (@var{x}, @var{tol}) -## This function has been deprecated. Use issymmetric instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_symmetric (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_symmetric is obsolete and will be removed from a future version of Octave; please use issymmetric instead"); - endif - - retval = issymmetric (varargin{:}); - -endfunction diff --git a/scripts/deprecated/is_vector.m b/scripts/deprecated/is_vector.m deleted file mode 100644 --- a/scripts/deprecated/is_vector.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 1996, 1997, 2002, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} is_vector (@var{a}) -## This function has been deprecated. Use isvector instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = is_vector (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "is_vector is obsolete and will be removed from a future version of Octave; please use isvector instead"); - endif - - retval = isvector (varargin{:}); - -endfunction diff --git a/scripts/deprecated/lognormal_cdf.m b/scripts/deprecated/lognormal_cdf.m deleted file mode 100644 --- a/scripts/deprecated/lognormal_cdf.m +++ /dev/null @@ -1,62 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2006, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} lognormal_cdf (@var{x}, @var{a}, @var{v}) -## For each element of @var{x}, compute the cumulative distribution -## function (CDF) at @var{x} of the lognormal distribution with -## parameters @var{a} and @var{v}. If a random variable follows this -## distribution, its logarithm is normally distributed with mean -## @code{log (@var{a})} and variance @var{v}. -## -## Default values are @var{a} = 1, @var{v} = 1. -## @end deftypefn - -## Author: KH -## Description: CDF of the log normal distribution - -## Deprecated in version 3.0 - -function cdf = lognormal_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "lognormal_cdf is obsolete and will be removed from a future version of Octave; please use logncdf instead"); - endif - - if (nargin > 1) - a = varargin{2}; - idx = a >= 0; - a(idx) = log (a(idx)); - a(!idx) = NaN; - varargin{2} = a; - endif - - if (nargin > 2) - v = varargin{3}; - idx = v >= 0; - v(idx) = sqrt (v(idx)); - v(!idx) = NaN; - varargin{3} = v; - endif - - cdf = logncdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/lognormal_inv.m b/scripts/deprecated/lognormal_inv.m deleted file mode 100644 --- a/scripts/deprecated/lognormal_inv.m +++ /dev/null @@ -1,62 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2006, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} lognormal_inv (@var{x}, @var{a}, @var{v}) -## For each element of @var{x}, compute the quantile (the inverse of the -## CDF) at @var{x} of the lognormal distribution with parameters @var{a} -## and @var{v}. If a random variable follows this distribution, its -## logarithm is normally distributed with mean @code{log (@var{a})} and -## variance @var{v}. -## -## Default values are @var{a} = 1, @var{v} = 1. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the log normal distribution - -## Deprecated in version 3.0 - -function inv = lognormal_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "lognormal_inv is obsolete and will be removed from a future version of Octave; please use logninv instead"); - endif - - if (nargin > 1) - a = varargin{2}; - idx = a >= 0; - a(idx) = log (a(idx)); - a(!idx) = NaN; - varargin{2} = a; - endif - - if (nargin > 2) - v = varargin{3}; - idx = v >= 0; - v(idx) = sqrt (v(idx)); - v(!idx) = NaN; - varargin{3} = v; - endif - - inv = logninv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/lognormal_pdf.m b/scripts/deprecated/lognormal_pdf.m deleted file mode 100644 --- a/scripts/deprecated/lognormal_pdf.m +++ /dev/null @@ -1,62 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2006, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} lognormal_pdf (@var{x}, @var{a}, @var{v}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the lognormal distribution with parameters -## @var{a} and @var{v}. If a random variable follows this distribution, -## its logarithm is normally distributed with mean @code{log (@var{a})} -## and variance @var{v}. -## -## Default values are @var{a} = 1, @var{v} = 1. -## @end deftypefn - -## Author: KH -## Description: PDF of the log normal distribution - -## Deprecated in version 3.0 - -function pdf = lognormal_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "lognormal_pdf is obsolete and will be removed from a future version of Octave; please use lognpdf instead"); - endif - - if (nargin > 1) - a = varargin{2}; - idx = a >= 0; - a(idx) = log (a(idx)); - a(!idx) = NaN; - varargin{2} = a; - endif - - if (nargin > 2) - v = varargin{3}; - idx = v >= 0; - v(idx) = sqrt (v(idx)); - v(!idx) = NaN; - varargin{3} = v; - endif - - pdf = lognpdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/lognormal_rnd.m b/scripts/deprecated/lognormal_rnd.m deleted file mode 100644 --- a/scripts/deprecated/lognormal_rnd.m +++ /dev/null @@ -1,63 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2006, 2007, 2008, 2009 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} lognormal_rnd (@var{a}, @var{v}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} lognormal_rnd (@var{a}, @var{v}, @var{sz}) -## Return an @var{r} by @var{c} matrix of random samples from the -## lognormal distribution with parameters @var{a} and @var{v}. Both -## @var{a} and @var{v} must be scalar or of size @var{r} by @var{c}. -## Or if @var{sz} is a vector, create a matrix of size @var{sz}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{a} and @var{v}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the log normal distribution - -## Deprecated in version 3.0 - -function rnd = lognormal_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "lognormal_rnd is obsolete and will be removed from a future version of Octave; please use lognrnd instead"); - endif - - if (nargin > 1) - a = varargin{2}; - idx = a >= 0; - a(idx) = log (a(idx)); - a(!idx) = NaN; - varargin{2} = a; - endif - - if (nargin > 2) - v = varargin{3}; - idx = v >= 0; - v(idx) = sqrt (v(idx)); - v(!idx) = NaN; - varargin{3} = v; - endif - - rnd = lognrnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/meshdom.m b/scripts/deprecated/meshdom.m deleted file mode 100644 --- a/scripts/deprecated/meshdom.m +++ /dev/null @@ -1,48 +0,0 @@ -## Copyright (C) 1996, 1997, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} meshdom (@var{x}, @var{y}) -## This function has been deprecated. Use @code{meshgrid} instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function [xx, yy] = meshdom (x, y) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "meshdom is obsolete and will be removed from a future version of Octave; please use meshgrid instead"); - endif - - if (nargin == 2) - if (isvector (x) && isvector (y)) - xx = ones (length (y), 1) * x(:).'; - yy = flipud (y(:)) * ones (1, length (x)); - else - error ("meshdom: arguments must be vectors"); - endif - else - print_usage (); - endif - -endfunction diff --git a/scripts/deprecated/normal_cdf.m b/scripts/deprecated/normal_cdf.m deleted file mode 100644 --- a/scripts/deprecated/normal_cdf.m +++ /dev/null @@ -1,48 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} normal_cdf (@var{x}, @var{m}, @var{v}) -## For each element of @var{x}, compute the cumulative distribution -## function (CDF) at @var{x} of the normal distribution with mean -## @var{m} and variance @var{v}. -## -## Default values are @var{m} = 0, @var{v} = 1. -## @end deftypefn - -## Author: TT -## Description: CDF of the normal distribution - -## Deprecated in version 3.0 - -function cdf = normal_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "normal_cdf is obsolete and will be removed from a future version of Octave; please use normcdf instead"); - endif - - if (nargin > 2) - varargin{3} = sqrt (varargin{3}); - endif - - cdf = normcdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/normal_inv.m b/scripts/deprecated/normal_inv.m deleted file mode 100644 --- a/scripts/deprecated/normal_inv.m +++ /dev/null @@ -1,48 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} normal_inv (@var{x}, @var{m}, @var{v}) -## For each element of @var{x}, compute the quantile (the inverse of the -## CDF) at @var{x} of the normal distribution with mean @var{m} and -## variance @var{v}. -## -## Default values are @var{m} = 0, @var{v} = 1. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the normal distribution - -## Deprecated in version 3.0 - -function inv = normal_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "normal_inv is obsolete and will be removed from a future version of Octave; please use norminv instead"); - endif - - if (nargin > 2) - varargin{3} = sqrt (varargin{3}); - endif - - inv = norminv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/normal_pdf.m b/scripts/deprecated/normal_pdf.m deleted file mode 100644 --- a/scripts/deprecated/normal_pdf.m +++ /dev/null @@ -1,48 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} normal_pdf (@var{x}, @var{m}, @var{v}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the normal distribution with mean @var{m} and -## variance @var{v}. -## -## Default values are @var{m} = 0, @var{v} = 1. -## @end deftypefn - -## Author: TT -## Description: PDF of the normal distribution - -## Deprecated in version 3.0 - -function pdf = normal_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "normal_pdf is obsolete and will be removed from a future version of Octave; please use normpdf instead"); - endif - - if (nargin > 2) - varargin{3} = sqrt (varargin{3}); - endif - - pdf = normpdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/normal_rnd.m b/scripts/deprecated/normal_rnd.m deleted file mode 100644 --- a/scripts/deprecated/normal_rnd.m +++ /dev/null @@ -1,51 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} normal_rnd (@var{m}, @var{v}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} normal_rnd (@var{m}, @var{v}, @var{sz}) -## Return an @var{r} by @var{c} or @code{size (@var{sz})} matrix of -## random samples from the normal distribution with parameters @var{m} -## and @var{v}. Both @var{m} and @var{v} must be scalar or of size -## @var{r} by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{m} and @var{v}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the normal distribution - -## Deprecated in version 3.0 - -function rnd = normal_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "normal_rnd is obsolete and will be removed from a future version of Octave; please use normrnd instead"); - endif - - if (nargin > 1) - varargin{2} = sqrt (varargin{2}); - endif - - rnd = normrnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/pascal_cdf.m b/scripts/deprecated/pascal_cdf.m deleted file mode 100644 --- a/scripts/deprecated/pascal_cdf.m +++ /dev/null @@ -1,45 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} pascal_cdf (@var{x}, @var{n}, @var{p}) -## For each element of @var{x}, compute the CDF at x of the Pascal -## (negative binomial) distribution with parameters @var{n} and @var{p}. -## -## The number of failures in a Bernoulli experiment with success -## probability @var{p} before the @var{n}-th success follows this -## distribution. -## @end deftypefn - -## Author: KH -## Description: CDF of the Pascal (negative binomial) distribution - -## Deprecated in version 3.0 - -function cdf = pascal_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "pascal_cdf is obsolete and will be removed from a future version of Octave; please use nbincdf instead"); - endif - - cdf = nbincdf(varargin{:}); - -endfunction diff --git a/scripts/deprecated/pascal_inv.m b/scripts/deprecated/pascal_inv.m deleted file mode 100644 --- a/scripts/deprecated/pascal_inv.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} pascal_inv (@var{x}, @var{n}, @var{p}) -## For each element of @var{x}, compute the quantile at @var{x} of the -## Pascal (negative binomial) distribution with parameters @var{n} and -## @var{p}. -## -## The number of failures in a Bernoulli experiment with success -## probability @var{p} before the @var{n}-th success follows this -## distribution. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the Pascal distribution - -## Deprecated in version 3.0 - -function inv = pascal_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "pascal_inv is obsolete and will be removed from a future version of Octave; please use nbininv instead"); - endif - - inv = nbininv(varargin{:}); - -endfunction diff --git a/scripts/deprecated/pascal_pdf.m b/scripts/deprecated/pascal_pdf.m deleted file mode 100644 --- a/scripts/deprecated/pascal_pdf.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} pascal_pdf (@var{x}, @var{n}, @var{p}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the Pascal (negative binomial) distribution with -## parameters @var{n} and @var{p}. -## -## The number of failures in a Bernoulli experiment with success -## probability @var{p} before the @var{n}-th success follows this -## distribution. -## @end deftypefn - -## Author: KH -## Description: PDF of the Pascal (negative binomial) distribution - -## Deprecated in version 3.0 - -function pdf = pascal_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "pascal_pdf is obsolete and will be removed from a future version of Octave; please use nbinpdf instead"); - endif - - pdf = nbinpdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/pascal_rnd.m b/scripts/deprecated/pascal_rnd.m deleted file mode 100644 --- a/scripts/deprecated/pascal_rnd.m +++ /dev/null @@ -1,47 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2007, 2008, 2009 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} pascal_rnd (@var{n}, @var{p}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} pascal_rnd (@var{n}, @var{p}, @var{sz}) -## Return an @var{r} by @var{c} matrix of random samples from the Pascal -## (negative binomial) distribution with parameters @var{n} and @var{p}. -## Both @var{n} and @var{p} must be scalar or of size @var{r} by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{n} and @var{p}. Or if @var{sz} is a vector, -## create a matrix of size @var{sz}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the Pascal distribution - -## Deprecated in version 3.0 - -function rnd = pascal_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "pascal_rnd is obsolete and will be removed from a future version of Octave; please use nbinrnd instead"); - endif - - rnd = nbinrnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/poisson_cdf.m b/scripts/deprecated/poisson_cdf.m deleted file mode 100644 --- a/scripts/deprecated/poisson_cdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} poisson_cdf (@var{x}, @var{lambda}) -## For each element of @var{x}, compute the cumulative distribution -## function (CDF) at @var{x} of the Poisson distribution with parameter -## lambda. -## @end deftypefn - -## Author: KH -## Description: CDF of the Poisson distribution - -## Deprecated in version 3.0 - -function cdf = poisson_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "poisson_cdf is obsolete and will be removed from a future version of Octave; please use poisscdf instead"); - endif - - cdf = poisscdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/poisson_inv.m b/scripts/deprecated/poisson_inv.m deleted file mode 100644 --- a/scripts/deprecated/poisson_inv.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} poisson_inv (@var{x}, @var{lambda}) -## For each component of @var{x}, compute the quantile (the inverse of -## the CDF) at @var{x} of the Poisson distribution with parameter -## @var{lambda}. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the Poisson distribution - -## Deprecated in version 3.0 - -function inv = poisson_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "poisson_inv is obsolete and will be removed from a future version of Octave; please use poissinv instead"); - endif - - inv = poissinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/poisson_pdf.m b/scripts/deprecated/poisson_pdf.m deleted file mode 100644 --- a/scripts/deprecated/poisson_pdf.m +++ /dev/null @@ -1,41 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} poisson_pdf (@var{x}, @var{lambda}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the poisson distribution with parameter @var{lambda}. -## @end deftypefn - -## Author: KH -## Description: PDF of the Poisson distribution - -## Deprecated in version 3.0 - -function pdf = poisson_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "poisson_pdf is obsolete and will be removed from a future version of Octave; please use poisspdf instead"); - endif - - pdf = poisspdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/poisson_rnd.m b/scripts/deprecated/poisson_rnd.m deleted file mode 100644 --- a/scripts/deprecated/poisson_rnd.m +++ /dev/null @@ -1,45 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} poisson_rnd (@var{lambda}, @var{r}, @var{c}) -## Return an @var{r} by @var{c} matrix of random samples from the -## Poisson distribution with parameter @var{lambda}, which must be a -## scalar or of size @var{r} by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the size of @var{lambda}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the Poisson distribution - -## Deprecated in version 3.0 - -function rnd = poisson_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "poisson_rnd is obsolete and will be removed from a future version of Octave; please use poissrnd instead"); - endif - - rnd = poissrnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/polyinteg.m b/scripts/deprecated/polyinteg.m deleted file mode 100644 --- a/scripts/deprecated/polyinteg.m +++ /dev/null @@ -1,55 +0,0 @@ -## Copyright (C) 1996, 1997, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} polyinteg (@var{c}) -## Return the coefficients of the integral of the polynomial whose -## coefficients are represented by the vector @var{c}. -## -## The constant of integration is set to zero. -## @seealso{polyint, poly, polyderiv, polyreduce, roots, conv, deconv, residue, -## filter, polyval, polyvalm} -## @end deftypefn - -## Author: Tony Richardson -## Created: June 1994 -## Adapted-By: jwe - -## Deprecated in version 3.0 - -function y = polyinteg (p) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "polyinteg is obsolete and will be removed from a future version of Octave; please use polyint instead"); - endif - - y = polyint (p); - -endfunction - -%!assert(all (all (polyinteg ([2, 2]) == [1, 2, 0]))); - -%!assert(isempty (polyinteg ([]))); - -%!assert(all (all (polyinteg (3) == [3, 0]))); - -%!error polyinteg ([1, 2; 3, 4]); - diff --git a/scripts/deprecated/struct_contains.m b/scripts/deprecated/struct_contains.m deleted file mode 100644 --- a/scripts/deprecated/struct_contains.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2003, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} struct_contains (@var{expr}, @var{name}) -## This function has been deprecated. Use isfield instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = struct_contains (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "struct_contains is obsolete and will be removed from a future version of Octave; please use isfield instead"); - endif - - retval = isfield (varargin{:}); - -endfunction diff --git a/scripts/deprecated/struct_elements.m b/scripts/deprecated/struct_elements.m deleted file mode 100644 --- a/scripts/deprecated/struct_elements.m +++ /dev/null @@ -1,39 +0,0 @@ -## Copyright (C) 2003, 2005, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} struct_elements (@var{struct}) -## This function has been deprecated. Use fieldnames instead. -## @end deftypefn - -## Author: jwe - -## Deprecated in version 3.0 - -function retval = struct_elements (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "struct_elements is obsolete and will be removed from a future version of Octave; please use fieldnames instead"); - endif - - retval = char (fieldnames (varargin{:})); - -endfunction diff --git a/scripts/deprecated/t_cdf.m b/scripts/deprecated/t_cdf.m deleted file mode 100644 --- a/scripts/deprecated/t_cdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} t_cdf (@var{x}, @var{n}) -## For each element of @var{x}, compute the CDF at @var{x} of the -## t (Student) distribution with @var{n} degrees of freedom, i.e., -## PROB (t(@var{n}) <= @var{x}). -## @end deftypefn - -## Author: KH -## Description: CDF of the t distribution - -## Deprecated in version 3.0 - -function cdf = t_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "t_cdf is obsolete and will be removed from a future version of Octave; please use tcdf instead"); - endif - - cdf = tcdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/t_inv.m b/scripts/deprecated/t_inv.m deleted file mode 100644 --- a/scripts/deprecated/t_inv.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} t_inv (@var{x}, @var{n}) -## For each component of @var{x}, compute the quantile (the inverse of -## the CDF) at @var{x} of the t (Student) distribution with parameter -## @var{n}. -## @end deftypefn - -## For very large n, the "correct" formula does not really work well, -## and the quantiles of the standard normal distribution are used -## directly. - -## Author: KH -## Description: Quantile function of the t distribution - -## Deprecated in version 3.0 - -function inv = t_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "t_inv is obsolete and will be removed from a future version of Octave; please use tinv instead"); - endif - - inv = tinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/t_pdf.m b/scripts/deprecated/t_pdf.m deleted file mode 100644 --- a/scripts/deprecated/t_pdf.m +++ /dev/null @@ -1,42 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} t_pdf (@var{x}, @var{n}) -## For each element of @var{x}, compute the probability density function -## (PDF) at @var{x} of the @var{t} (Student) distribution with @var{n} -## degrees of freedom. -## @end deftypefn - -## Author: KH -## Description: PDF of the t distribution - -## Deprecated in version 3.0 - -function pdf = t_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "t_pdf is obsolete and will be removed from a future version of Octave; please use tpdf instead"); - endif - - pdf = tpdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/t_rnd.m b/scripts/deprecated/t_rnd.m deleted file mode 100644 --- a/scripts/deprecated/t_rnd.m +++ /dev/null @@ -1,47 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2006, 2007, 2008, 2009 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} t_rnd (@var{n}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} t_rnd (@var{n}, @var{sz}) -## Return an @var{r} by @var{c} matrix of random samples from the t -## (Student) distribution with @var{n} degrees of freedom. @var{n} must -## be a scalar or of size @var{r} by @var{c}. Or if @var{sz} is a -## vector create a matrix of size @var{sz}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the size of @var{n}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the t distribution - -## Deprecated in version 3.0 - -function rnd = t_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "t_rnd is obsolete and will be removed from a future version of Octave; please use trnd instead"); - endif - - rnd = trnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/uniform_cdf.m b/scripts/deprecated/uniform_cdf.m deleted file mode 100644 --- a/scripts/deprecated/uniform_cdf.m +++ /dev/null @@ -1,43 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} uniform_cdf (@var{x}, @var{a}, @var{b}) -## Return the CDF at @var{x} of the uniform distribution on [@var{a}, -## @var{b}], i.e., PROB (uniform (@var{a}, @var{b}) <= x). -## -## Default values are @var{a} = 0, @var{b} = 1. -## @end deftypefn - -## Author: KH -## Description: CDF of the uniform distribution - -## Deprecated in version 3.0 - -function cdf = uniform_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "uniform_cdf is obsolete and will be removed from a future version of Octave; please use unifcdf instead"); - endif - - cdf = unifcdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/uniform_inv.m b/scripts/deprecated/uniform_inv.m deleted file mode 100644 --- a/scripts/deprecated/uniform_inv.m +++ /dev/null @@ -1,43 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} uniform_inv (@var{x}, @var{a}, @var{b}) -## For each element of @var{x}, compute the quantile (the inverse of the -## CDF) at @var{x} of the uniform distribution on [@var{a}, @var{b}]. -## -## Default values are @var{a} = 0, @var{b} = 1. -## @end deftypefn - -## Author: KH -## Description: Quantile function of the uniform distribution - -## Deprecated in version 3.0 - -function inv = uniform_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "uniform_inv is obsolete and will be removed from a future version of Octave; please use unifinv instead"); - endif - - inv = unifinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/uniform_pdf.m b/scripts/deprecated/uniform_pdf.m deleted file mode 100644 --- a/scripts/deprecated/uniform_pdf.m +++ /dev/null @@ -1,43 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} uniform_pdf (@var{x}, @var{a}, @var{b}) -## For each element of @var{x}, compute the PDF at @var{x} of the uniform -## distribution on [@var{a}, @var{b}]. -## -## Default values are @var{a} = 0, @var{b} = 1. -## @end deftypefn - -## Author: KH -## Description: PDF of the uniform distribution - -## Deprecated in version 3.0 - -function pdf = uniform_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "uniform_pdf is obsolete and will be removed from a future version of Octave; please use unifpdf instead"); - endif - - pdf = unifpdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/uniform_rnd.m b/scripts/deprecated/uniform_rnd.m deleted file mode 100644 --- a/scripts/deprecated/uniform_rnd.m +++ /dev/null @@ -1,46 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008 Kurt Hornik -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} uniform_rnd (@var{a}, @var{b}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} uniform_rnd (@var{a}, @var{b}, @var{sz}) -## Return an @var{r} by @var{c} or a @code{size (@var{sz})} matrix of -## random samples from the uniform distribution on [@var{a}, @var{b}]. -## Both @var{a} and @var{b} must be scalar or of size @var{r} by @var{c}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{a} and @var{b}. -## @end deftypefn - -## Author: KH -## Description: Random deviates from the uniform distribution - -## Deprecated in version 3.0 - -function rnd = uniform_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "uniform_rnd is obsolete and will be removed from a future version of Octave; please use unifrnd instead"); - endif - - rnd = unifrnd (varargin{:}); - -endfunction diff --git a/scripts/deprecated/weibcdf.m b/scripts/deprecated/weibcdf.m --- a/scripts/deprecated/weibcdf.m +++ b/scripts/deprecated/weibcdf.m @@ -31,6 +31,7 @@ ## @end deftypefn ## Deprecated in version 3.0 +## Matlab still has this function, so don't remove just yet. function cdf = weibcdf (varargin) diff --git a/scripts/deprecated/weibinv.m b/scripts/deprecated/weibinv.m --- a/scripts/deprecated/weibinv.m +++ b/scripts/deprecated/weibinv.m @@ -24,6 +24,7 @@ ## @end deftypefn ## Deprecated in version 3.0 +## Matlab still has this function, so don't remove just yet. function inv = weibinv (varargin) diff --git a/scripts/deprecated/weibpdf.m b/scripts/deprecated/weibpdf.m --- a/scripts/deprecated/weibpdf.m +++ b/scripts/deprecated/weibpdf.m @@ -31,6 +31,7 @@ ## @end deftypefn ## Deprecated in version 3.0 +## Matlab still has this function, so don't remove just yet. function pdf = weibpdf (varargin) diff --git a/scripts/deprecated/weibrnd.m b/scripts/deprecated/weibrnd.m --- a/scripts/deprecated/weibrnd.m +++ b/scripts/deprecated/weibrnd.m @@ -29,6 +29,7 @@ ## @end deftypefn ## Deprecated in version 3.0 +## Matlab still has this function, so don't remove just yet. function rnd = weibrnd (varargin) diff --git a/scripts/deprecated/weibull_cdf.m b/scripts/deprecated/weibull_cdf.m deleted file mode 100644 --- a/scripts/deprecated/weibull_cdf.m +++ /dev/null @@ -1,55 +0,0 @@ -## Copyright (C) 2005, 2006, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} weibull_cdf (@var{x}, @var{shape}, @var{scale}) -## Compute the cumulative distribution function (CDF) at @var{x} of the -## Weibull distribution with shape parameter @var{scale} and scale -## parameter @var{shape}, which is -## -## @example -## 1 - exp(-(x/shape)^scale) -## @end example -## -## @noindent -## for @var{x} >= 0. -## @end deftypefn - -## Deprecated in version 3.0 - -function cdf = weibull_cdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "weibull_cdf is obsolete and will be removed from a future version of Octave; please use wblcdf instead"); - endif - - if (nargin == 2) - varargin{3} = varargin{2}; - varargin{2} = 1; - elseif (nargin > 2) - tmp = varargin{3}; - varargin{3} = varargin{2}; - varargin{2} = tmp; - endif - - cdf = wblcdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/weibull_inv.m b/scripts/deprecated/weibull_inv.m deleted file mode 100644 --- a/scripts/deprecated/weibull_inv.m +++ /dev/null @@ -1,48 +0,0 @@ -## Copyright (C) 2005, 2006, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} weibull_inv (@var{x}, @var{shape}, @var{scale}) -## Compute the quantile (the inverse of the CDF) at @var{x} of the -## Weibull distribution with shape parameter @var{scale} and scale -## parameter @var{shape}. -## @end deftypefn - -## Deprecated in version 3.0 - -function inv = weibull_inv (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "weibull_inv is obsolete and will be removed from a future version of Octave; please use wblinv instead"); - endif - - if (nargin == 2) - varargin{3} = varargin{2}; - varargin{2} = 1; - elseif (nargin > 2) - tmp = varargin{3}; - varargin{3} = varargin{2}; - varargin{2} = tmp; - endif - - inv = wblinv (varargin{:}); - -endfunction diff --git a/scripts/deprecated/weibull_pdf.m b/scripts/deprecated/weibull_pdf.m deleted file mode 100644 --- a/scripts/deprecated/weibull_pdf.m +++ /dev/null @@ -1,55 +0,0 @@ -## Copyright (C) 2005, 2006, 2007, 2008 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} weibull_pdf (@var{x}, @var{shape}, @var{scale}) -## Compute the probability density function (PDF) at @var{x} of the -## Weibull distribution with shape parameter @var{scale} and scale -## parameter @var{shape} which is given by -## -## @example -## scale * shape^(-scale) * x^(scale-1) * exp(-(x/shape)^scale) -## @end example -## -## @noindent -## for @var{x} > 0. -## @end deftypefn - -## Deprecated in version 3.0 - -function pdf = weibull_pdf (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "weibull_pdf is obsolete and will be removed from a future version of Octave; please use wblpdf instead"); - endif - - if (nargin == 2) - varargin{3} = varargin{2}; - varargin{2} = 1; - elseif (nargin > 2) - tmp = varargin{3}; - varargin{3} = varargin{2}; - varargin{2} = tmp; - endif - - pdf = wblpdf (varargin{:}); - -endfunction diff --git a/scripts/deprecated/weibull_rnd.m b/scripts/deprecated/weibull_rnd.m deleted file mode 100644 --- a/scripts/deprecated/weibull_rnd.m +++ /dev/null @@ -1,51 +0,0 @@ -## Copyright (C) 2005, 2006, 2007, 2008, 2009 John W. Eaton -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} weibull_rnd (@var{shape}, @var{scale}, @var{r}, @var{c}) -## @deftypefnx {Function File} {} weibull_rnd (@var{shape}, @var{scale}, @var{sz}) -## Return an @var{r} by @var{c} matrix of random samples from the -## Weibull distribution with parameters @var{scale} and @var{shape} -## which must be scalar or of size @var{r} by @var{c}. Or if @var{sz} -## is a vector return a matrix of size @var{sz}. -## -## If @var{r} and @var{c} are omitted, the size of the result matrix is -## the common size of @var{alpha} and @var{sigma}. -## @end deftypefn - -## Deprecated in version 3.0 - -function rnd = weibull_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "weibull_rnd is obsolete and will be removed from a future version of Octave; please use wblrnd instead"); - endif - - if (nargin > 1) - tmp = varargin{2}; - varargin{2} = varargin{1}; - varargin{1} = tmp; - endif - - rnd = wblrnd (varargin{:}); - -endfunction - diff --git a/scripts/deprecated/wiener_rnd.m b/scripts/deprecated/wiener_rnd.m deleted file mode 100644 --- a/scripts/deprecated/wiener_rnd.m +++ /dev/null @@ -1,47 +0,0 @@ -## Copyright (C) 1995, 1996, 1997, 2005, 2007, 2008, 2009 Friedrich Leisch -## -## This file is part of Octave. -## -## Octave is free software; you can redistribute it and/or modify it -## under the terms of the GNU General Public License as published by -## the Free Software Foundation; either version 3 of the License, or (at -## your option) any later version. -## -## Octave is distributed in the hope that it will be useful, but -## WITHOUT ANY WARRANTY; without even the implied warranty of -## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -## General Public License for more details. -## -## You should have received a copy of the GNU General Public License -## along with Octave; see the file COPYING. If not, see -## . - -## -*- texinfo -*- -## @deftypefn {Function File} {} wiener_rnd (@var{t}, @var{d}, @var{n}) -## Return a simulated realization of the @var{d}-dimensional Wiener Process -## on the interval [0, @var{t}]. If @var{d} is omitted, @var{d} = 1 is -## used. The first column of the return matrix contains time, the -## remaining columns contain the Wiener process. -## -## The optional parameter @var{n} gives the number of summands used for -## simulating the process over an interval of length 1. If @var{n} is -## omitted, @var{n} = 1000 is used. -## @end deftypefn - -## Author: FL -## Description: Simulate a Wiener process - -## Deprecated in version 3.0 - -function retval = wiener_rnd (varargin) - - persistent warned = false; - if (! warned) - warned = true; - warning ("Octave:deprecated-function", - "wiener_rnd is obsolete and will be removed from a future version of Octave; please use wienrnd instead"); - endif - - retval = wienrnd (varargin{:}); - -endfunction