diff --git a/R/generate_collinearity_subset.R b/R/generate_collinearity_subset.R index 060f439..7c0ece4 100644 --- a/R/generate_collinearity_subset.R +++ b/R/generate_collinearity_subset.R @@ -57,9 +57,6 @@ generate_collinearity_subset <- function(ManyEcoEvo, collinearity_subset) { mutate(data = map(.x = data, .f = dplyr::anti_join, collinearity_subset, by = join_by(response_id, id_col, dataset) )) %>% - mutate(effects_analysis = map(.x = effects_analysis, - .f = dplyr::anti_join, collinearity_subset, - by = join_by(response_id, study_id == id_col, dataset) )) %>% mutate(diversity_data = map2(.x = diversity_data, .y = data,