fixing validation check in impute_missing_peaks()

calico · Nov 21, 2023 · 41ffe77 · 41ffe77
1 parent abe5470
commit 41ffe77
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/mutate_mzroll_list.R b/R/mutate_mzroll_list.R
@@ -93,7 +93,7 @@ impute_missing_peaks <- function(mzroll_list,
 
   features <- mzroll_list$features %>% dplyr::select(groupId)
 
-  if(!all(features$groupId %in% lod_values$groupId) | nrow(features) != nrow(lod_values)) {
+  if(!all(features$groupId %in% lod_values$groupId)) {
     stop("groupId values of lod_value table and feature table of triple omic data must match")
   }