Mercurial > hg > octave-nkf
annotate scripts/deprecated/pascal_cdf.m @ 8920:eb63fbe60fab
update copyright notices
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sat, 07 Mar 2009 10:41:27 -0500 |
parents | 1cdb42b372e8 |
children |
rev | line source |
---|---|
8920 | 1 ## Copyright (C) 1995, 1996, 1997, 2007, 2008 Kurt Hornik |
6349 | 2 ## |
3 ## This file is part of Octave. | |
4 ## | |
5 ## Octave is free software; you can redistribute it and/or modify it | |
6 ## under the terms of the GNU General Public License as published by | |
7016 | 7 ## the Free Software Foundation; either version 3 of the License, or (at |
8 ## your option) any later version. | |
6349 | 9 ## |
10 ## Octave is distributed in the hope that it will be useful, but | |
11 ## WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
13 ## General Public License for more details. | |
14 ## | |
15 ## You should have received a copy of the GNU General Public License | |
7016 | 16 ## along with Octave; see the file COPYING. If not, see |
17 ## <http://www.gnu.org/licenses/>. | |
6349 | 18 |
19 ## -*- texinfo -*- | |
20 ## @deftypefn {Function File} {} pascal_cdf (@var{x}, @var{n}, @var{p}) | |
21 ## For each element of @var{x}, compute the CDF at x of the Pascal | |
22 ## (negative binomial) distribution with parameters @var{n} and @var{p}. | |
23 ## | |
24 ## The number of failures in a Bernoulli experiment with success | |
25 ## probability @var{p} before the @var{n}-th success follows this | |
26 ## distribution. | |
27 ## @end deftypefn | |
28 | |
29 ## Author: KH <Kurt.Hornik@wu-wien.ac.at> | |
30 ## Description: CDF of the Pascal (negative binomial) distribution | |
31 | |
7693
8e5371d47da6
note version when functions were deprecated
John W. Eaton <jwe@octave.org>
parents:
7017
diff
changeset
|
32 ## Deprecated in version 3.0 |
8e5371d47da6
note version when functions were deprecated
John W. Eaton <jwe@octave.org>
parents:
7017
diff
changeset
|
33 |
6349 | 34 function cdf = pascal_cdf (varargin) |
35 | |
7696
0a362fa8f3c8
Add warning to rest of deprecated functions
David Bateman <dbateman@free.fr>
parents:
7693
diff
changeset
|
36 persistent warned = false; |
0a362fa8f3c8
Add warning to rest of deprecated functions
David Bateman <dbateman@free.fr>
parents:
7693
diff
changeset
|
37 if (! warned) |
0a362fa8f3c8
Add warning to rest of deprecated functions
David Bateman <dbateman@free.fr>
parents:
7693
diff
changeset
|
38 warned = true; |
0a362fa8f3c8
Add warning to rest of deprecated functions
David Bateman <dbateman@free.fr>
parents:
7693
diff
changeset
|
39 warning ("Octave:deprecated-function", |
7704
1cdb42b372e8
don't embed newline in warning messages in deprecated functions
John W. Eaton <jwe@octave.org>
parents:
7696
diff
changeset
|
40 "pascal_cdf is obsolete and will be removed from a future version of Octave; please use nbincdf instead"); |
7696
0a362fa8f3c8
Add warning to rest of deprecated functions
David Bateman <dbateman@free.fr>
parents:
7693
diff
changeset
|
41 endif |
0a362fa8f3c8
Add warning to rest of deprecated functions
David Bateman <dbateman@free.fr>
parents:
7693
diff
changeset
|
42 |
6349 | 43 cdf = nbincdf(varargin{:}); |
44 | |
45 endfunction |