changeset 6859:5fddcbbe880e

[project @ 2007-09-04 12:59:42 by dbateman]
author dbateman
date Tue, 04 Sep 2007 12:59:42 +0000
parents a993057eb97f
children 8057825b748f
files scripts/ChangeLog scripts/statistics/distributions/chi2cdf.m scripts/statistics/distributions/chi2inv.m scripts/statistics/distributions/chi2pdf.m
diffstat 4 files changed, 11 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Sun Sep 02 06:41:13 2007 +0000
+++ b/scripts/ChangeLog	Tue Sep 04 12:59:42 2007 +0000
@@ -1,3 +1,11 @@
+2007-09-04  David Bateman  <dbateman@free.fr>
+
+	* statistics/distributions/chi2pdf.m,
+	statistics/distributions/chi2cdf.m,
+	statistics/distributions/chi2inv.m: Modifiy the call to the gamma
+	distribution functions to account for inverse of scale factor in
+	gamma functions.
+
 2007-09-01  John W. Eaton  <jwe@octave.org>
 
 	* plot/Makefile.in (SOURCES): Add ancestor.m to the list.
--- a/scripts/statistics/distributions/chi2cdf.m	Sun Sep 02 06:41:13 2007 +0000
+++ b/scripts/statistics/distributions/chi2cdf.m	Tue Sep 04 12:59:42 2007 +0000
@@ -40,6 +40,6 @@
     endif
   endif
 
-  cdf = gamcdf (x, n / 2, 1 / 2);
+  cdf = gamcdf (x, n / 2, 2);
 
 endfunction
--- a/scripts/statistics/distributions/chi2inv.m	Sun Sep 02 06:41:13 2007 +0000
+++ b/scripts/statistics/distributions/chi2inv.m	Tue Sep 04 12:59:42 2007 +0000
@@ -40,6 +40,6 @@
     endif
   endif
 
-  inv = gaminv (x, n / 2, 1 / 2);
+  inv = gaminv (x, n / 2, 2);
 
 endfunction
--- a/scripts/statistics/distributions/chi2pdf.m	Sun Sep 02 06:41:13 2007 +0000
+++ b/scripts/statistics/distributions/chi2pdf.m	Tue Sep 04 12:59:42 2007 +0000
@@ -40,6 +40,6 @@
     endif
   endif
 
-  pdf = gampdf (x, n / 2, 1 / 2);
+  pdf = gampdf (x, n / 2, 2);
 
 endfunction