# HG changeset patch
# User dbateman
# Date 1188910782 0
# Node ID 5fddcbbe880ee62c8f16501ed557a220a3e7fa33
# Parent  a993057eb97f93d70aa30d48e5fe53d22d2a43f2
[project @ 2007-09-04 12:59:42 by dbateman]

diff -r a993057eb97f -r 5fddcbbe880e scripts/ChangeLog
--- 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.
diff -r a993057eb97f -r 5fddcbbe880e scripts/statistics/distributions/chi2cdf.m
--- 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
diff -r a993057eb97f -r 5fddcbbe880e scripts/statistics/distributions/chi2inv.m
--- 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
diff -r a993057eb97f -r 5fddcbbe880e scripts/statistics/distributions/chi2pdf.m
--- 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