diff --git a/workflow/apps/r/calculate_interaction_zscores5.R b/workflow/apps/r/calculate_interaction_zscores5.R index 74c1ae58..d0b0df08 100644 --- a/workflow/apps/r/calculate_interaction_zscores5.R +++ b/workflow/apps/r/calculate_interaction_zscores5.R @@ -566,6 +566,10 @@ main <- function() { write.csv(suppressors_lm_K, file = file.path(out_dir, "ZScores_Interaction_DeletionSuppressors_K_lm.csv"), row.names = FALSE) + interaction_scores_deletion <- interaction_scores_deletion %>% + arrange(desc(Z_lm_L)) %>% + arrange(desc(NG)) + # Generate plots for interaction scores }) })