fix OntologyEnrichment numberOfDEsInBin

CSBiology · Aug 16, 2019 · 0ed0161 · 0ed0161
1 parent 0472f29
commit 0ed0161
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/.paket/Paket.Restore.targets b/.paket/Paket.Restore.targets
@@ -116,7 +116,7 @@
     </PropertyGroup>
 
     <PropertyGroup Condition=" '$(MSBuildSupportsHashing)' == 'true' And '$(CacheFilesExist)' == 'true' ">
-      <!-- If the restire file doesn't exist we need to restore, otherwise only if hashes don't match -->
+      <!-- If the restore file doesn't exist we need to restore, otherwise only if hashes don't match -->
       <PaketRestoreRequired>true</PaketRestoreRequired>
       <PaketRestoreRequired Condition=" '$(PaketRestoreLockFileHash)' == '$(ProjectsRestoredHash)' ">false</PaketRestoreRequired>
       <PaketRestoreRequired Condition=" '$(PaketRestoreLockFileHash)' == '' ">true</PaketRestoreRequired>

diff --git a/src/BioFSharp.Stats/OntologyEnrichment.fs b/src/BioFSharp.Stats/OntologyEnrichment.fs
@@ -79,10 +79,10 @@ module OntologyEnrichment =
             let hp = FSharp.Stats.Distributions.Discrete.hypergeometric totalUnivers totalNumberOfDE numberInBin            
             if numberInBin > splitPvalueThreshold then                                
                 // Calculate normal pValue
-                1. -  hp.CDF (float (numberOfDEsInBin + 1)) 
+                1. -  hp.CDF (float (numberOfDEsInBin - 1)) 
             else
                 // Calculate split pValue
-                0.5 * ((1. -  hp.CDF(float(numberOfDEsInBin + 1)) ) + ( (1. -  hp.CDF(float(numberOfDEsInBin))) ) )
+                0.5 * ((1. -  hp.CDF(float(numberOfDEsInBin - 1)) ) + ( (1. -  hp.CDF(float(numberOfDEsInBin))) ) )
         else
                 nan