improve filtering of features without ...

... sufficient numbers of paired samples. Implementation now identical to ttest.
computational-metabolomics · Jun 16, 2021 · 39f0468 · 39f0468
1 parent 097545a
commit 39f0468
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: structToolbox
 Type: Package
 Title: Some tools bult using the struct package
-Version: 0.8.3
+Version: 0.8.5
 Author: Gavin Rhys Lloyd
 Maintainer: Gavin Rhys Lloyd <[email protected]>
 Description: Extends the class templates provided by the struct package to provide methods for training PCA, PLS models with cross-validation, permutation testing etc.

diff --git a/R/wilcox_test_class.R b/R/wilcox_test_class.R
@@ -146,8 +146,9 @@ setMethod(f="model.apply",
             D=predicted(FF)
 
             # check equal numbers per class. if not equal then exclude.
-            out=FF$count[,1]!=FF$count[,2]
-            D$data=D$data[,!out]
+            IN=rownames(FF$count)[(FF$count[,1]==FF$count[,2]) & (FF$count[,1]>2) & (FF$count[,2]>2)]
+            D$data=D$data[,IN]
+            D$variable_meta=D$variable_meta[IN,]
         }