closes #40

Uses identical to test for equivalence of a logical vector from a test and the reference.
MoseleyBioinformaticsLab · Mar 22, 2024 · 6efbf9b · 6efbf9b
1 parent 0cf64d8
commit 6efbf9b
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: categoryCompare2
-Version: 0.100.14
+Version: 0.100.15
 Title: Meta-Analysis of High-Throughput Experiments Using Feature
         Annotations
 Author: Robert M. Flight <[email protected]>

diff --git a/R/graph_visualization.R b/R/graph_visualization.R
@@ -81,7 +81,7 @@ setMethod("annotation_combinations",
 
   for (in_comb in name_combinations){
     has_match <- apply(sig_matrix, 1, function(in_sig){
-      in_sig == unique_combinations[in_comb, ]
+      identical(in_sig, unique_combinations[in_comb, ])
     })
     combination_assign[has_match] <- in_comb
     description_assign[has_match] <- group_description[in_comb]