filter regions based on probality of at most 1 causal effect

filter regions based on probality of at most 1 causal effect

filter_regions(regionlist, group_prior, prob_single = 0.8)