Mercurial > hg > octave-nkf

comparison scripts/deprecated/exponential_inv.m @ 6777:4775fc1aa728

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-07-18 16:32:51 by dbateman]
author dbateman
date Wed, 18 Jul 2007 16:32:52 +0000
parents 2a16423e4aa0
children 93c65f2a5668
comparison
equal deleted inserted replaced
6776:d388a35a9481 6777:4775fc1aa728
27 ## Author: KH <Kurt.Hornik@wu-wien.ac.at> 27 ## Author: KH <Kurt.Hornik@wu-wien.ac.at>
28 ## Description: Quantile function of the exponential distribution 28 ## Description: Quantile function of the exponential distribution
29 29
30 function inv = exponential_inv (varargin) 30 function inv = exponential_inv (varargin)
31 31
32 if (nargin > 1)
33 varargin{2} = 1 ./ varargin{2};
34 endif
35
32 inv = expinv (varargin{:}); 36 inv = expinv (varargin{:});
33 37
34 endfunction 38 endfunction