From: John Darrington <john@darrington.wattle.id.au>
Date: Wed, 18 Sep 2013 17:16:08 +0000 (+0200)
Subject: Calculate Fisher Exact Test even if all cell counts >= 5
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f219320996e359b41708a94059e5f27a45926bf6;p=pspp

Calculate Fisher Exact Test even if all cell counts >= 5

Remove the condition that one of the cell counts must be < 5
before calculating the fisher exact test.  This condition seems
to be an anachronism, but still (erroneously) documented in Algorithms.
---

diff --git a/NEWS b/NEWS
index e37115b36d..92c0a4fb02 100644
--- a/NEWS
+++ b/NEWS
@@ -10,6 +10,11 @@ Changes after 0.8.0:
 
    - VARIABLE ROLE.
 
+ * Changes to existing commands:
+
+   - CROSSTABS: The requirement that one expected count must be less than five
+	before Fishers Exact Test will be reported has been removed.
+
  * PSPPIRE graphical user interface improvements:
 
    - A new set of icons has been contributed.
diff --git a/src/language/stats/crosstabs.q b/src/language/stats/crosstabs.q
index 6d4ab64ea0..6adae77b03 100644
--- a/src/language/stats/crosstabs.q
+++ b/src/language/stats/crosstabs.q
@@ -2244,8 +2244,7 @@ calc_chisq (struct pivot_table *pt,
       }
 
       /* Fisher. */
-      if (f11 < 5. || f12 < 5. || f21 < 5. || f22 < 5.)
-	calc_fisher (f11 + .5, f12 + .5, f21 + .5, f22 + .5, fisher1, fisher2);
+      calc_fisher (f11 + .5, f12 + .5, f21 + .5, f22 + .5, fisher1, fisher2);
     }
 
   /* Calculate Mantel-Haenszel. */