my bad ihihih

EmanuelSoda · Sep 5, 2023 · bb409df · bb409df
1 parent 307c07b
commit bb409df
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/filter_by.R b/R/filter_by.R
@@ -50,7 +50,7 @@ filter_by_slope <- function(screenR_Object, genes, group_var_treatment,
     data <- dplyr::rename(data, slope_control = .data$Slope)
 
 
-    data <- dplyr::filter(data, .data$slope_control <= slope_control)
+    data <- dplyr::filter(data, .data$slope_control => slope_control)
 
     data <- dplyr::filter(data, .data$slope_treatment <= slope_treatment)