Mercurial > octave-nkf

comparison scripts/specfun/betai.m @ 2311:2b5788792cad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-07-11 20:18:38 by jwe]
author jwe
date Thu, 11 Jul 1996 20:18:38 +0000
parents 5cffc4b8de57
children 204cc7db6f4a
comparison
equal deleted inserted replaced
2310:e2a8f216373d 2311:2b5788792cad
15 ### You should have received a copy of the GNU General Public License 15 ### You should have received a copy of the GNU General Public License
16 ### along with Octave; see the file COPYING. If not, write to the Free 16 ### along with Octave; see the file COPYING. If not, write to the Free
17 ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA 17 ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA
18 ### 02111-1307, USA. 18 ### 02111-1307, USA.
19 19
20 ## usage: betai (a, b, x)
21 ##
22 ## Returns the incomplete beta function
23 ## betai (a, b, x) = BETA(a,b)^(-1) INT_0^x t^(a-1) (1-t)^(b-1) dt.
24 ## If x has more than one component, both a and b must be scalars.
25 ## If x is a scalar, a and b must be of compatible dimensions.
26
20 function y = betai (a, b, x) 27 function y = betai (a, b, x)
21
22 ## usage: betai (a, b, x)
23 ##
24 ## Returns the incomplete beta function
25 ## betai (a, b, x) = BETA(a,b)^(-1) INT_0^x t^(a-1) (1-t)^(b-1) dt.
26 ## If x has more than one component, both a and b must be scalars.
27 ## If x is a scalar, a and b must be of compatible dimensions.
28 28
29 ## Written by KH (Kurt.Hornik@ci.tuwien.ac.at) on Aug 2, 1994. 29 ## Written by KH (Kurt.Hornik@ci.tuwien.ac.at) on Aug 2, 1994.
30 30
31 ## Computation is based on the series expansion 31 ## Computation is based on the series expansion
32 ## betai(a, b, x) 32 ## betai(a, b, x)